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THE FOLLOWING MOOiriCATIONS HAVE BEEN MADE TO THE OLD CZDHVA: 

THE HARDWARE QUESTION "TYPE Of LOOPflACK" HAS BEEN ALTERED TO INCLUDE THE 
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1.0 GENERAL PROGRAM CONSIDERATIONS 

1.1 PROGRAM ABSTRACT 

CZDHVBO IS PART OT THE OHU-ll FUNCTIONAL VERIFICATION TEST. 
THIS PART OF THE TEST VERIFIES THAT THE MAJOR COMMUNICATIONS 
FUNCTIONS OF THE BOARD ARE FUNCTIONING CORRECTLY. THIS PROGRAM 
DOES NOT PERFORM EXTENSIVE DATA TRANSMISSION AND RECEPTION TESTS. 

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXOP*. ACT. APT. SLIDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES. REFER 
TO THE XXDP* USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCTIONS* COMMANDS 
OF THIS DOCUMENT. 



1.2 SYSTEM REQUIREMENTS 

THE FOLLOWING HARDWARE IS REQUIRED TO PUN THE DHU FVT: 



0 UNIBUS PROCESSOR WITH AT LEAST 32K BYTES OF MEMORY. 

0 DHL* BOARDS INSTALLED ON THE UNIBUS. 

0 APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING XXDP* 
MEDIA OR A DOWN LINE LOADING SYSTEM. 



1.3 RELATED DOCUMENTS AND STANDARDS 



0 XXDP^ USER'S MANUAL - DESCRIBES THE RUNNING OF DIAGNOSTICS 
UNDER THE XXDP« MONITOR. 



1.4 DIAGNOSTIC HIERARCY PREREQUISITES 



THE PROCESSOR. THE UNIBUS. THE SYSTEM MEMORY. THE CONSOLE TERMINAL 
AND THE LOAD MEDIA ARE ASSUMED TO HAVE BEEN TESTED AND FOUND WORKING 
BEFORE THIS PROGRAM IS RUN. 
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2.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION. REFER TO THE XXDP* USER'S MANUAL (CHOUSE. 



2.1 COMMANDS 



THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP* USER'S MANUAL HAS MORE DETAILS. 



COMMAND 



START 

RESTART 

CONTINUE 

PROCEED 

EXIT 

ADD 

DROP 
PRINT 



DISPLAY 

FLAGS 

2FLAGS 



EFFECT 



START THE DIAGNOSTIC FROM AN INITIAL STATE 
START THE DIAGNOSTIC WITHOUT INITIALIZING 
CONTINUE AT TEST THAT UAS INTERRUPTED (AFTER tC) 
CONTINUE FROM AN ERROR HALT 

RETURN TO XXDP^ MONITOR (XXDP* OPERATION ONLY!) 
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 
DEACTIVATE A UNIT 

PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 

BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 

REPORTS SECTION OF THIS DOCUMENT) 

TYPE A LIST OF ALL DEVICE INFORMATION 

TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 

CLEAR ALL FLAGS (SEE FLAGS SEC T I ON > 



A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. 
YOU MAY. FOR EXAMPLE. TYPE 'STA" INSTEAD OF 'START 
MORE INFORMATION CAN BE FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 



SO 
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2.2 SWITCHES 

THERE ARE SEVERAL SWITCHES WHICH ARE USED TO HODIFY SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LEGAi COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW. A DECIMAL NUMBER IS DESIGNATED BY 'DDDDD' . 

SWITCH EFFECT 

/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 

THE LIST. LIST IS A STRING OF TEST 

NUMBERS. FOR EXAMPLE - /TESTS: I :5: 7- 10. 

THIS LIST WILL CAUSE TESTS 1,5.7.8.9.10 TO 

BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS:DDDDD EXECUTE DDDDD PASSES CDDDDD • 1 TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS. SEE THE FLAGS SECTION 

OF THIS DOCUMENT. 
/EOP: DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 

DDDDD PASSES ONLY. (DDDDD • I TO 64000) 
/UNITS:LIST TEST/AOD/DROP ONLY THOSE UNITS SPECIFIED 

IN THE LIST. LIST EXAMPLE - /UNITS:0: 5: 10- 12 

USE UNITS 0.5.10.11.12 (UNIT NUMBERS « 0-63) 

EXAMPLE OF SWITCH USAGE: 

START/TESTS : 1 -5/PASS: 1000 /EOP : 100 

THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS I THROUGH 5 WILL BE 
EXECUTED. 2) ALL UNITS WILL TESTED 1000 TIMES AND 5) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FJRST THREE CHARACTERS. YOU MAY. 
FOR EXAMPLE. TYPE "/TES:l-5" INSTEAD OF -/TESTS: 1 -5". 

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED Bv EACH 
COMMAND. 

TESTS PASS FLAGS EOP UNITS 

START XX XX X 

RESTART XX XX X 

CONTINUE X XX 

PROCEED X 

DROP X 

ADD X 

PRINT 

DISPLAY X 

FLAGS 

ZFLAGS 

EXIT 
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2.5 FLAGS 



FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. Fl AGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 
ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS. 
NO COMMANDS AFFECT THE STATE OF THE FLAGS i THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 

FLAG EFFECT 



HOE HALT ON ERROR - CONTROL IS RETURNED TO 

RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

lER* INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 

FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE. NUMBER. PC. TEST AND UNIT) 

IXR* INHIBIT EXTENDED ERROR REPORTS (THOSE 

CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE "BELL" ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 

APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 

STATISTICAL REPORTING) 
IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 

HAVE EVALUATION SUPPORT) 

*SEE THE ERROR INFORMATION SECTION OF THIS OOCUT^NT, 

SEE THE XXOPt USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE. 
TO CAUSE THE PROGRAM TO LOOP ON ERROR. INHIBIT ERROR REPORTS 
AND TYPE A "BELL" ON ERROR. YOU MAY USE THE FOLLOWING STRING: 

/FLAGS : LOE :IER: BOE 
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2.4 EXTENDED COMMAND SYNTAX 

2.4.1 START COMMAND - 



STA(RT )/TESTS : < TEST -LIST>/PASS s «PASS-CNT > /FLAGS : 
<FLAG-LIST>/EOP:<INCR> 



2.4.1.1 TESTS SUITCH (/TESTS:<TEST-LIST>) - 

<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR RANGES 
OF DECIMAL NUMBERS (1-5:8-10 ETC.). SEPERATED BY COLONS. THAT SPECIFY 
THE TESTS TO BE EXECUTED. TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES. THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY 
THE OPERATOR. SEE EXAMPLE AT END OF "EFFECT OF START COMMAND" 
SECTION. 



2.4.1.2 PASS SUITCH (/PASS:<PASS-CNT>) - 

<PASS-CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUrfiER OF 
PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
(ALL SELECTED TESTS). THE DEFAULT IS NON-ENDING EXECUTION. IN THIS 
CASE. EXIT FROM THE PROGRAM IS ACCOnPLlSHEO EITHER BY TYPING A 
CONTROL/C OR BY OCCURANCE OF AN ERROR UITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COnMAND MODE. SEE EXAMPLE AT END 
OF "EFFECT OF START COMMAND" SECTION. 



2.4.1.3 FLAGS SUITCH (/FLAGSl<FLAG-LtST>> - 

<FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>. 
<FLAG-1>. OR <FLAG-0>. SEPARATED BY COLONS. UHERE <FLAG> HAS ONE OF 
THE F0LL0UIN6 VALUES: 

HOE HALT ON ERROR. CAUSING COMMAND MODE TO 

BE ENTERED UHEN AN ERROR IS ENCOUNTERED. 
LOE LOOP ON ERROR. CAUSING T»C DIAGNOSTIC TO 

LOOP CONTINUOUSLY UITHIN THE SMALLEST 

DEFINED BLOCK OF COOING (SEGMENT. SUBTEST. 

OR TEST) CONTAINING THE ERROR. 
lER INHIBIT ERROR REPORTING. 
IBE INHIBIT BASIC ERROR REPORTS. 
IXE INHIBIT EXTENDED ERROR REPORTS. 
PRI DIRECT ALL MESSAGES TO A LINE PRINTER. 
PNT PRINT NUMBER OF TEST BEING EXECUTED. 
BOE BELL ON ERROR (NOT RELATED TO BELL PROMPTING). 
UAM RUN IN UNATTENDED MODE. BYPASSING MANUAL 

INTERVENTION (ILLEGAL FOR THIS DIAGNOSTIC). 
ISR INHIBIT STATISTICAL REPORTS. 
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rOU INHIBIT DROPPING OF UNITS BY DIAGNOSTIC. 
CHAS NO EFFECT IN THIS DIAGNOSTIC.) 

LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET. THOSE EQUATED TO 0 ARE 
CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS SWITCH IS NOT 
GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND" SECTION. 



2.4.1.4 END OF PASS SWITCH C /EOP : < INCR> ) - 

<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE PRINTED. THE 
DEFAULT IS AT THE END OF EVERY PASS. SEE EXAMPLE AT END OF "EFFECT OF 
START COMMAND" SLCTION. 



2,4.1.5 EFFECT OF START COMMAND - 

THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE. THE SOFTWARE PARAMETER DIALOGUE. THE 
INITIALIZATION QUESTIONS. AND THEN THE DIAGNOSTIC COMMENCES TESTING. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION '0 
UNITS CD) ?" TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER Of 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUESTIONS WHEREBY THE 
P-TABLES THEMSELVES ARE BUILT. EACH P-TA8LE IS A CORE-RESIDENT TABLE 
CONTAINING ALL THE HARDWARE INFORMATION FOR ONE COMPLETE UNIT. EACH 
QUESTION IS FOLLOWED BY THE RESPONSE RADIX (D FOR DECIMAL. B FOR 
BINARY. 0 FOR OCTAL. L FOR YES/NO) IN PARENTHESES AND THE DEFAULT 
VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P- TABLE 
QUESTIONS SEE THE "HARDWARE PARAMETERS" SECTION. 

FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS TO 
BUILD THE SOFTWARE TABLES. WHICH DEFINE OPERATING PARAMETERS OF THE 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS" SECTION. 

EXAMPLE: 

ST A/ TESTS : 1 : 3 -4 : /PASS : 3/FL AGS : lER : HOE • 1 



THIS COMMAND WILL CAUSE THREE PASSES TO BE MADE. WITH EACH PASS 
CONSISTING OF TESTS 1.3. AND 4. THERE IS NO DIFFERENCE BETWEEN SAYING 
<FLAG> AND SAYING <FLAG-1>. THE NOTATION <FLAG-0> IS MEANINGFUL ONLY 
ON A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS PREVIOUSLY SET. 
NOTE THAT ON ALL COMMANDS ONLY THE FIRST THREE LETTERS ARE SCANNED. 
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2.4.2 RESTART COMMAND - 

RESC TART )/TESTS : < TEST -LIST >/PASS : <PASS -CNT > /FLAGS : 
<FLAG-LIST>/UNITS:<UNIT-LIST> 



2.4.2,1 TESTS. PASS. AND FLAGS SUITCHES 

< TEST -LIST >, <PASS CNT>, AND <FLAG LIST> ARE AS IN THE START 
COMMAND. 



2.4.2.2 UNITS SWITCH ( /UNITS : <UNIT -LIST> ) - <UNIT-LIST> IS A SEQUENCE 
OF DECIMAL NUMBERS CO.l ETC.) OR RANGES OF DECIMAL NUMBERS (0-5. 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED 
BY COLONS, THE NUMBERS MAY RANGE FROM 0 THRU N-1 (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMBER INDICATES 
THE POSITION OF THE P-TABLE AS THE DATA UAS ENTERED DURING THE 
HARDWARE DIAGLOGUE. THE UNITS WHICH ARE SELECTED MUST NOT HAVE BEEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 



2.4.2.3 EFFECT OF RESTART COMMAND - 

THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P- TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED. INSTEAD OF NEW ONES BEING BUILT. THE UNITS SWITCH SHOULD 
NOT BE USED WITH THIS PROGRAM. THE SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
COMMAND MODE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL WAYS: A) 
THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE. B) AN ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET. OR C) A CONTROL/C WAS 
ENTERED BY THE OPERATOR. 



2.4.3 CONTINUE COMMAND - 

CON( TINUE )/PASS : <PASS -CNT/FL AGS : <FLAG -LIST > 



2.4.3.1 FLAG SWITCH (/FLAGS: <FL AG -LIST > ) ^ 

<FLAG-LIST> IS SAME AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 



L 1 
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2.4,3.2 EFFECT OF CONTINUE COMMAND 

CONTINUE MUST FOLLOW A START OR RESTART. AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EFFECT 
OF THE COMMAND IS TO GO TO THE BEGINNING OF THE TEST THAT MAS BEING 
EXECUTED UHEN THE HALT OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 



2.4.4 PROCEED COMMAND 
PROCCEED)/FLAGS:<FLAG-LIST> 



2.4.4.1 FLAGS SWITCH ( /FLAGS !<FLAG -LIST >) - 

<FLAG-LIST> IS AS IN THE START COMMAND. BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 



2.4.4.2 EFFECT OF PROCEED COMMAND - 

PROCEED MUST FOLLOW A START. RESTART. OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



2.4.5 ADO COMMAND - 
ADD/UNITS: <UNIT .LIST> 



2.4.6 EFFECT OF ADO COMMAND - 

THE IJNITS SPECIFIED ARE AOOED TO THE TEST SrOUENCE. EACH 
UNIT MUST HAVE A P-TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED Br A 
RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 



2.4.7 DROP COMMAND • 



DRO(P)/UNITS:<UNIT LIST> 



IX 

C20HVB0 DHL 11 FUNC TST PART2 HACRO M1200 15 MAR 84 09:28 PAGE 13 
PROGRAM DOCUMENT 

2.4.8 EFFECT OF DROP COMMAND 

THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
UILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. ^hIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 



?.4,9 PRINT COMMAND 
PRI(NT) 



2.4,9.1 EFFECT OF PRINT COMMAND - 

THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED. 



2.4,10 DISPLAY COMMAND - 
DISCPLAY )/UNITS : <UNIT -LIST > 



2.4.10.1 EFFECT OF DISPLAY COMMAND - 

THE HARDWARE P-TABLE FOR THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 



2.4.11 FLAGS COMMAND - 
FLA(GS) 



2.4.11.1 EFFECT OF FLAGS COMMAND - 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 



Ni 
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2.4.12 ZFLAGS COMMAND 
ZFL(AGS) 



2.4.13 ZFLAGS COMMANO - 
ALL FLAGS ARE CLEARED. 

2.4.14 CONTROt. CHARACTERS - 

C A CONTROL/C (C) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMANO MODE. 

Z A CONTROL/Z (Z) ENTERED DURING ONE OF THE TWO 
OPERATOR DIALOGUES" HARDWARE P- TABLE DIALOGUE OR 
SOFTWARE P- TABLE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

0 A CONTROL/0 (0) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL TELETYPE OUTPUT TO BE 
SURPRESSED FOR THE REMAINDER OF THE DIAGNOSTIC OR 
UNTIL ANOTHER CONTROL/Q IS TYPED. WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 



:/0HVBO OHO 11 fUNC r&T MACRO nt200 15 MAR 64 09:26 PAGE 15 

PROGRAM OOCUHENT 

2.5 MAPOWARt QUESTIONS 

kHEN A DIAGNOSTIC IS STARTED. THE RUNTIME SERVICES WILL PROMPT 
T»C USER FOR HARDWARE I»rORt1ATION BY TYPING "CHANGE HW (L) 7" 
TOU MUST ANSWER "Y" ATTER A START COWAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED" USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y". THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 

1. CSR ADDRESS • THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 

2. INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR ADDRESS OF THE SPECIFIED DHU-ll. THE DEFAULT ANSWER 

IS 310 (OCTAL). 

S. ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 

MAP OF THE SERIAL COMMUNICATION LINES ON THE DHUll WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE (I.E. BIT 5 FOR LINE 
5 ) THAT LINE WILL BE TESTED Bv THE FVT. 

4. TYPE OF LOOPBACK (1-INTERNAL. 2-H5029 OR H3277) ■ THIS QUESTION 
REQUESTS THE TYPE OF LOOPBACK TO BE USED WHEN TESTING THE 
DHU-11. THE FOLLOWING TYPES ME SUPPORTED: 

0 INTERNAL - ONLY INTERNAL UART LOOPBACK IS TO BE USED IN 
TESTING THE OHU-11. 

0 H3029 OR H3277 • STAGGERED LOOPBACK CONNECTORS ARE PROVIDED 
ON THE DHUll DISTRIBUTION PANEL (H3029) IF THIS DISTRIBUTION 
PANEL IS NOT PRESENT THEN H5277 STAGGERED BERG CONNECTOR(S) 
MUST BE INSTALLED ON THE BERG CONNECTOR SOCKETS OF THE DHUll. 

0 H32*i • SINGLE LINE. 25 PIN LOOPBACK CONNECTORS (TYPE HS25) 
ARE INSTALLED ON THE LINES TO BE TESTED. 
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2.h SOFTWARE QUESTIONS 

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

OR CONTINUE COHMANO. THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 

PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MOOES. VOU WILL BE PROMPTED BY "CHANGE SW (L) ?" 

IF YOU WISH TO CHANGE ANY PARAMETERS. ANSWER BY TYPING 

"Y". THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPH(S). 

1. REPORT UNIT NUMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

2. EXTENDED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE "TEST FAILED" 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAULT IS "NO" I.E. ONLY 
A MESSAGE REPORTING THE FACT THAT THE TEST FAILED WILL BE 
PRINTED. 

S. NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE • THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
"YES". THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INDIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPORTS. 
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2.7 EXTENDED P- TABLE DIALOGUE 

UHEN YOU ANSWER THE HARDWARE QUESTIONS. YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 
UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 
A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES. THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 

TO ILLUSTRATE A MORE EFFICIENT METHOD. SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE. THE XYll. SUPPOSE THIS DEVICE CONSISTS OF 
A CONTROL MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS 0 THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q FACTOR. THIS Q-FACTOR MAY BE 0 OR 1. BELOW IS A SIMPLE WAV 
TO BUIeD A TABLE FOR ONE XYll WITH EIGHT UNITS. 

♦ UNITS CO) ? 8<CR> 

UNIT I 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE • (0) ? 0<CR> 
Q.FACTOR (0) 0 ? 1<CR> 

UNIT 2 

CSR ADDRESS (0) 7 160000<CR> 
SUB-DEVICE • (0) 7 1<CR> 
Q FACTOR (0) I 7 0<CR> 

UNIT 5 

CSR ADDRESS (0) ? 160000<CR> 
SUB -DEVICE ♦ (0) 7 2<CR> 
Q-FACTOR (0) 0 7 <CR> 

UNIT 4 

CSR ADDRESS (0) 7 160000<CR> 
SUB-DEVICE • (0) 7 5<CR> 
Q-FACTOR (0) 0 7 <CR* 

UNIT 5 

CSR ADDRESS (0) ? 160000<CR> 
SUB -DEVICE « (0) 7 4<CR> 
Q-FACTOR (0) 0 7 *CR> 

UNIT 6 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE • (0) 7 S<CR> 
Q-FACTOR (0) 0 7 <CR> 

UNIT 7 

CSR ADDRESS (0) 7 160000<CR> 
Sl«-DEVICE 9 CO) 7 6<CR> 
Q FACTOR CO) 0 7 l«CR> 



CZOHVBO OH*.' 11 fUNC TbT PARTS MACRO M1200 15 MAR 84 09:2$ PAGE 18 
PROGRAM DOCUMENT 



SEO 17 



UNIT 8 

CSR ADDRESS (0) 160000<CR> 

SUB-DEVICE * (0) ? 7<CR> 

Q. FACTOR (0) I ? <CR> 

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANCES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 

AS YOU CAN SEE FROM THE ABOVE EXAMPLE. THE HAROUARE PARAMETERS 

DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATURE. 

* UNITS (D) ? 8<CR> 
UNIT I 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE « (0) ? 0.1<CR> 
Q-FACTOR CO) 0 ? 1.0<CR> 

UNIT 5 

CSR ADDRESS CO) ? 160000<CR> 
SUB -DEVICE # CO) 7 2-S<CR> 
Q-FACTOR CO) 0 ? 0<CR> 

UNIT 7 

CSR ADDRESS CO) ? I60000<CR> 
SUB-DEVICE # CO) ? 6.7<CR> 
Q-FACTOR CO) 0 7 1<CR> 

AS YOU CAN SEE IN THE ABOVE DIALOGUE. THE RUNTIME SERVICES UILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE IfTORmTION GIVEN IN ANY 
ONE PASS THROUGH T»C QUESTIONS. IN THE FIRST PASS. TUD ENTRIES 
ARE BUILT SINCE TUO SUB-OeviCCS AND Q-FACTORS MERE SPECIFIED. T»C 
SERVICES Assure THAT T»C CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN T»C SECOM) RASS. FOUR ENTRIES tCRE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE 
"-" CONSTRUCT TELLS T»€ RUNTIME SERVICES TO INCREMENT T»C DATA 
FROM T»C FIRST NUI«ER TO T»€ SECOND. IN THIS CASE. SUB -DEVICES 
2. 3. 4 AND 5 WERE SPECIFIED. CIF T»C SUB -DEVICE UERE SPECIFIED 
BY ADDRESSES. THE INCREMENT UOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND 0 RESPECTIVELY 
SINCE THEY UERE ONLY SPECIFIED ONCE. THE LAST TUO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 

« ^^ITS (D) ? 8«CR> 
^^IT 1 
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CSR ADDRESS CO) ? 160000<CR> 
SUB-OEVICE ^ CO) ? 0 7<CR> 
Q-FACTOR CO) 0 ? 0 , 1 ,0. . . , 1 . 1<CR> 

AS YOU CAN SEE FROM TMIS EXAMPLE. NULL REPLIES CCOMMAS FNCLOSING 
A NULL FIELD) TELL THE RIWTIME SERVICES TO REPEAT THE LAST REPLt. 



2,8 QUICK START-UP PROCEDURE CXXDPO 
TO START UP THIS PROGRAM: 

1. BOOT XXDP* 

2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND 50HZ CIF THERE 
IS A CLOCK) QUESTIONS. NOTE. NOT ALL VERSIONS OF XXDP^ ASK 
FOR THE CLOCK FREQUENCY 

3. TYPE "R NAME". WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

5. ANSWER THE "CHANGE HW" QUESTION WITH "Y*' 

6. ANSWER ALL THE HARDWARE QUESTIONS 

7. ANSWER THE "CHANGE SW" QUESTION WITH '^N*^ 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLt THE 

DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS^ FQR DEFAULT INFORMATION 

SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS. AND HARDWARf QUESTIONS. 
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3.0 ERROR INFORMATION 

3.1 TYPES OF ERROR MESSAGES 

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 
A DIAGNOSTIC: GENERAL. BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALUAYS PRINTED UNLESS THE "lER" FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 

THE GENERA) ERROR MESSAGE IS OF THE FORM: 

NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC:XXXXXX 
ERROR MESSAGE 

.WHERE: NAME • DIAGNOSTIC NAME 

TYPE • ERROR TYPE (SYS FATAL. OEV FATAL, HARD OR SOFT) 
NUMBER - ERROR NUMBER 

UNIT NUMBER - 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER - TEST AND SUBTEST UHERE ERROR OCCURRED 
PC:XXXXXX - ADDRESS OF ERROR MESSAGE CALL 

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTEO UNLESS 
THE "lER" OR "IBR • FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 
DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR IfTORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAvS 
PRINTED UNLESS THE "lER". "IBR" OR "IXR" FLAGS ARE SET (SEE THE 
FLAGS SECTION OF THIS DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 
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SEQ 20 



3.2 SPECIFIC ERROR MESSAGES 



THIS PROGRAM IS INTENDED TO PROVIDE A 60/NOGO INDICATION 
OF THE FUNCTIONALITY OF THE DHU-ll BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
"EXTENDED ERROR REPORTING" SOFTWARE QUESTION WITH "NO". THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
DOCUMENT. AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING: 

CZDHV DVC FTL ERR 04106 ON UNIT 00 TST 003 SUB 000 PC: XXXXXX 
DMA.ABORT BIT TEST FAILED 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED 
DURING THE TEST WHICH TESTS THE DMA.ABORT BIT. 

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 

CZDHV DVC FTL ERR 04106 ON UNIT 00 TST 003 SUB COO PC: XXXXXX 
DMA.ABORT BIT TEST FAILED 

DMA.START BIT FOUND SET AFTER DMA ABORTED ON LINE: 6 



4.0 PERFORMANCE AND PROGRESS REPORTS 

AT THE END OF EACH PASS. THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE OIAC^STIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END 
OF PASS MESSAGE IS PRINTED. FOR FUTMER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT. 



J. C- 
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5.0 TEST SUMMARIES 

THE rOLLOkINC ARE INCLUDED UITHIN CZDHVB: 

1. DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 

2. DMA. START TEST - VERIFIES THAT EACH DMA START BIT WILL 
INITIATE A DMA TRANSMISSION ON A LINE 

3. DMA. ABORT TEST - VERIFIES THAT EACH DMA ABORT BIT WILL 
STOP A DMA TRANSMISSION. RETURN A TX. ACTION AND SUCCESFULY 
RESTART THE DMA. 

4. DMA. ERROR TEST • VERIFIES THAT THE DMA ERROR BIT IN THE CSR 
REPORTS DMA ERRORS CORRECTLY UHEN THEY OCCUR. 

5. O.AUTO INACTIVE TEST - VERIFIES THAT THE OUT UILL NOT RESPOND 
TO INCOMING XON AND XOFF CHARACTERS UHEN O.AUTO IS CLEAR. 

6. O.AUTO ACTIVE TEST - VERIFIES THAT THE DUT RESPONDS CORRECTLY 
TO INCOMING FLOW CONTROL CHARACTERS UHEN ACTIVE 

7. I. AUTO INACTIVE TEST • VERIFIES THAT THE OUT UILL NOT GENERATE 
XON AND XOFF CHARACTERS IN RESPONSE TO THE APPROPRIATE FIFO 
CONDITIONS UHEN I. AUTO IS INACTIVE. 

8. I. AUTO ACTIVE TEST - VERIFIES THAT THE OUT UILL GENERATE 
XON AND XOFF CHARACTERS IN RESPONSE TO THE APPROPRIATE FIFO 
CONDITIONS UHEN I. AUTO IS ACTIVE. 

9. FIFO DATA TEST - VERIFIES THAT THE FIFO UILL HOLD 256 
CHARACTERS UITHOUT CORRUPTING DATA. 

10. FIFO 3/4 LEVEL INACTIVE TEST - VERIFIES THAT THE 5/4 LEVEL 
ALARM DOES NOT BECOME ACTIVE BELOW THE 5/4 LEVEL. 

11. FIFO 3/4 LEVEL ACTIVE TEST - VERIFIES THAT THE 5/4 LEVEL 
ALARM BECOMES ACTIVE UHEN THE FIFO IS 3/4 FULL. 

12. FIFO 3/4 LEVEL ACTIVE/INACTIVE TEST - VERIFIES THAT THE 5/4 
LEVEL ALARM. ONCE ACTIVATED. REMAINS ACTIVE UNTIL THE FIFO 
IS REDUCED BELOU THE 1/2 LEVEL. 

13. FIFO 1/2 LEVEL TEST - VERIFIES THAT THE FIFO 1/2 LEVEL 
ALARM SYSTEM BECOMES ACTIVE AND INACTIVE AT THE CORRECT 

LEVELS. 

14. RXTIMER TEST - VERIFIES THAT THE HOLD OFF TIMER FOR 

RX INTERRUPTS IS OPERATING CORRECTLY. AND THAT THE 3/4 FULL 
LEVEL OVERIDES THE TIMER. 



CZDHVBO OHU 11 TUNC TbT PflRT2 MACRO M1200 l5-MflR 64 0-*:26 PAGE 21 I SEQ 22 

PROGRAM OOCUMENT 

15. TX ACTION FIFO TEST VERIFIES THAT THE TX ACTION FIFO 

CAN HOLD 16 UNIQUE TX-ACTIONS. AND THAT ONLY ONE TX INTERRUPT 
OCCURS FOR ALL 16 TX-ACTIONS. 

16. TX FIFO TEST - VERIFIES THAT THE FIFO WILL 64 UNIQUE CHARACTERS 
AND ALSO THAT ONLY ONE INTERRUPT OCCURS FOR ALL 64 CHARACTERS. 

17. BREAK GENERATION TEST - VERIFIES THAT ALL SERIAL TRANSMIT LINES 
CAN GENERATE A BREAK BY SETTING THE BRK BIT IN THE ASSOCIATED 
LNCTRL REGISTER. 

18. NO OVERRUN ERROR TEST - VERIFIES THAT THE DUT WILL NOT REPORT 
DATA OVERRUN ERRORS UHEN THEY DO NOT OCCUR. 

19. OVERRUN ERROR TEST - VERIFIES THAT THE DUT WILL REPORT DATA 
OVERRUN ERRORS UHEN THEY OCCUR. 

20. REPORT BMP CODES TEST • THIS PSEUDO TEST REPORTS THE FIRST 32 
CHARACTERS UHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS BY THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 
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SEQ if i 



6,0 EXAMPLE ERROR FREE PASS 

THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 

.R CZOHVBO 

CZDHVBO.BIN 

DRS 

CZDHV-B-O 

DHU-II FUNC TST PART2 
UNIT IS DHU-ll 
RESTRT ADDR: 147670 
DR>STA/PAS:1 

CHANGE HW (L) ? Y 

^ UNITS (D) ? 2 



UNIT 0 

CSR ADDRESS: 



(0) 160460 ? tZ 



UNIT 1 

CSR ADDRESS: (0) 160460 
INTERRUPT VECTOR ADDRESS: 
ACTIVE LINE BIT MAP: (0) 



? 160500 
(0) SIO ? S20 
177777 ? <CR> 



CO) 2 ? 1 



TYPE OF LOOPBACK (1-INTERNAL. 2-HS029 OR HS277): 
CHANGE SU (L) ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (L) Y ? <CR> 
EXTENDED ERROR REPORTING: (L) N ? <CR> 

TESTING UNIT : 0 

TESTING UNIT : 1 

CZDHV EOP 1 
0 TOTAL ERRS 



DR> 



L2 

FUNC TST PARTS MACRO M1200 15-MAR 84 09:28 PAGE 23 



SEQ 24 



1050 
1051 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
109A 
109^ 
1112 
1113 



000000 



000000 



002000 



002000 



002000 
002000 
002000 
002001 
002002 
002003 
002004 
002005 
002006 
002007 
002010 
002010 
002011 
002011 
002012 
002012 
002014 



000001 
000001 
000001 
000001 
000001 



002000 



103 
132 
104 
110 
126 
000 
000 
000 

102 

060 

000000 



.LIST SEQ.LOCBIN.hEB 
.NLIST CND 



.SBTTL PROGRAM HEADER 



.MCALL SVC 
SVC 



ir STRUCTURED MACROS ARE TO BE USED. 
TO INITIALIZE THE STRUCTURED MACROS. 



{ INITIALIZE SUPERVISOR MACROS 



ADD ".MCALL STRUCT" AND "STRUCT" 



SVCINS- 1 I LIST INSTRUCTIONS. SHIFTED RIGHT 

SVCTST- 1 , LIST TEST TAGS, SHIFTED RIGHT 

SVCSUB- 1 I LIST SUBTEST TAGS. SHIFTED RIGHT 

SVCGBL- 1 I LIST GLOBAL TAGS. SHIFTED RIGHT 

SVCTAG- 1 % LIST OTHER TAGS. SHIFTED RIGHT 

CHANGE THE VALUES OF THE SVC-.. SYMBOLS TO PE ZERO IF tOU WISH 
; TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

; SYMBOLS TO BE MINUS -ONE TO NOT LIST THE EXPANSIONS. YOU MAY 

; CHANCE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



.ENABL ABS 
s.ENABL AHA 



2000 



BGNMOD 



2 

: 



THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 



POINTER BGNRPT.BGNSU.BGNSFT.BGNDU.ERRTBL 



HEADER CZ0HV,B.0.22.0,PRI07 



LSNAfC:: 



LiREV: 
L$0EP0 
L$UNIT 
L$TIML 



.ASCII 


/c/ 


.ASCII 


/z/ 


.ASCII 


/o/ 


.ASCI^ 


/M/ 


.ASCII 


/V/ 


.BYTE 


0 


.BYTE 


0 


.BYTE 


0 


.ASCII 


/B' 


.ASCII 


/O- 


.UORO 


0 
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TUNC TST 


002014 


000022 


0020 lo 




002016 


035156 


002020 




002020 


035404 


002022 




002022 


002176 


002024 




002024 


002210 


002026 




002026 


035^06 


002030 




002030 


ooocoo 


^^^^ ^^^^ 9 ^% 

002032 




002032 


000000 


002034 




002034 


000000 


002036 




002036 


000000 


002040 




002040 


002124 


002042 




002042 


000340 


002044 




002044 


000000 


002046 




002046 


000000 


002050 




002050 


003 


002051 


003 


002052 




002052 


000000 


002054 


000000 


002056 




002056 


000000 


002060 




002060 


004120 


002062 




002062 


020030 


002064 




002064 


000000 


002066 




002066 


000000 


002070 




002070 


000000 


002072 




002072 


020704 


002074 




002074 


000000 


002076 




002076 


004130 


002100 




002100 


104035 


002102 




002102 


004050 






002104 


020044 
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SFG 





• WORD 


1. trWUr S ; 






unon 
































unon 
















unon 








unon 


L. III 








1 tnTP- • 








1 iPQ rfi' • 








I 4PMUT • < 
L. vCnv X z • 








1 tpytPX • 








1 tMDPW- 












L i^r • • 






unon 






L. # 1 I 






WORD 










1 iPPPP* 








1 ftPXP4* 
























1 ifM IT • - 






















UQRD 








EMT 


L$ETP.: 






.UORO 


LIICP:: 






.WORD 



22 

LIHARO 

< »sorT 

L$HU 

L(SU 

L»UAST 

0 

0 

0 

0 

L •DISPATCH 

PRI07 

0 

0 

CSRE VISION 
C»EOIT 

0 
0 

0 

L»OVTYP 

L$RPT 

0 

O 

0 

LtOU 
0 

LtOESC 
E«..OAO 
LSERRTBL 
LSINIT 



N2 
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1114 



002106 
002106 
002110 
002110 
002112 
002112 
002114 
002114 
002116 
002116 
002120 
002120 



020666 
020064 
020036 
000000 
000000 
000000 



SEO 26 



LiCCP: 

LiACP; 

LiPRT: 

LITEST: 

LIOLY: 

LiHiME: 



.WORD LICLEAN 

.MORO LI AUTO 

.UORO LIPROT 

.UORO 0 

.WORD 0 

.WORD 0 
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1U6 

1127 

112S 
1129 
1150 
1151 
11S2 
1155 



1154 



002122 
002122 
CO? 124 
002124 
002126 
002150 
002152 
002154 
002156 
002140 
002142 
002144 
002146 
002150 
002152 
002154 
002156 
002160 
002162 
002164 
002166 
002170 
002172 



000024 

021022 
021504 
021710 
022546 
022674 
025474 
024274 
024716 
025410 
025716 
026226 
026726 
027424 
050102 
051152 
051740 
052766 
055412 
054150 
055074 
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.S8TTL DISPATCH TABLE 

I THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST, 
I IT IS USED BT THE SUPERVISOR TO DISPATCH TO EACH TEST. 
I - 



DISPATCH 20 



.WORD 20 
L IDISPATCH:; 

.WORD Tl 

.WORD T2 

.WORD T5 

.WORD T4 

.WORD T5 

.WORD T6 

.WORD T7 

.WORD T8 

.WORD T9 

.WORD TIO 

.WORD Til 

.WORD T12 

.WORD T15 

.WORD T14 

.WORD ri5 

.WORD T16 

.WORD T17 

.WORD Tie 

.WORD ri9 

.WORD T20 



FUNC lit MACRO HtPOO 15 MAR 84 09:28 PAGE 25 



1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1156 
1159 
1160 



1161 
1162 
1165 
1164 
1165 
1166 
1167 



.SBTTL DEFAULT HARDWARE P TABLE 



THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES Of 
THE TEST -DEVICE PARAMETERS, THE STRUCTURE OF THIS TABLE 
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P TABLES, 
AND IS USED AS A "TEMPLATE" FOR BUILDING THE P- TABLES. 



002174 

002174 000004 

002176 

002176 

002176 160460 
002200 000510 
002202 177777 
002204 002 

002206 
002206 



6GNHW DFPTBL 



. WORD 160460 

.WORD 510 

.WORD 177777 

.BYTE 2 
.EVEN 
ENDHU 



L »HW : : 
DFPTBL 



J DEFAULT CSR ADDRESS 
(DEFAULT VECTOR ADDRESS 
.-DEFAULT ACTIVE LINES BIT MAP 
i DEFAULT LOOPBACK MODE 



L 10000 
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SEO i"* 



1176 
ll"? 
1178 
1179 
1180 

iiai 

1182 
1183 
1184 
1185 
1186 

1167 002206 

002206 000002 

002210 

002210 

1166 

1169 002210 000020 
1190 002212 000000 
1191 

1192 002214 
002214 



.SBTTL SOrTUARE P TABLE 



THE SOfTUARE TABLE CONTAINS VARIOUS DATA USED Br THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
AT RUN TIME. 



BGNSU SfPTBL 



OPTION: : 
NOERPT:: 

ENOSU 



L»SW:: 
SPPTBL: 



.WORD L 10001 -L>SU/2 



.WORD 
.WORD 



20 
0 



tBIT MAP Of PROGRAM CONTROL PLAGS 

lOErAULT NUMBER Of INDIVIDUAL DATA ERRORS TO RPT. 



L 10001: 



1201 




1202 




1203 




1213 




1214 




1215 




1216 




1217 




1218 




1219 




1220 




1221 


000020 


1222 


177777 


122S 




1224 




1225 


000000 


1226 


000002 


1227 


000002 


1228 


000004 


1229 


000006 


1230 


000006 


1231 


000010 


1232 


000012 


1233 


000014 


1254 


000016 


1235 




1236 




1237 


000020 


1238 


000030 


1239 


000100 


1240 




1241 




1256 002214 






100000 




040000 




A ^^^^^^^^ 

020000 




010000 




004000 




002000 




001000 




000400 




000200 




000100 




000040 




000020 




000010 




000004 




000002 




000001 




OOlOOO 




000400 




000200 




000100 
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.SBTTL GLOBAL EQUATES SECTION 



I THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
I ARE USED IN MORE THAN ONE TEST, 
i - - 

NUMLNS--20 iNUMBER OF LINES ON OHUll IS 8. 

MAPLNS-- 177777 iBIT MAP OF LINES ON DMUll. 

,*«•**• DEVICE REGISTER OFFSETS FROM THE CSR'S ADDRESS 

CSRO--0 iCSR REGISTER OFFSET FROM THE CSR ADDRESS 

RBUF0--2 I RECEIVE REGISTER OFFSET FROM THE CSR ADDRESS 

RXTIH0--2 iRECIEVE TIMER REGISTER OFFSET FROM THE CSR ADDRESS 

LPR0--4 iLlNE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 

FSLS0*-6 iFIFOSIZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 

FDATO— 6 iFIFODATA REGISTER OFFSET FROM THE CSR ADDRESS 

LNCTRO— 10 I LINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 

TXAD10--12 (TRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADDRESS 

TXAD20--14 iTRANSniT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS 

TXBFC0--16 I TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 

EQUATES USED WITH RESPECT TO THE RX BUFFER **•**« 

RXBETX—16. iLEVEL OF RX BUFFER AT UHICH TO RE-FNABLE TRANSMISSION. 

RX80TX-*2«. iLEVEL OF RX BUFFER AT WHICH TO DISABLE TRAI6MISSI0N. 

ftX8FUL**6«. I TOTAL CHARACTER CAPACITY OF THE RX BUFFER. 



EQUALS 



t 



1 BIT 


DIFINITIONS 


BIT15' 


100000 


BIT 14 « 


» 40000 


BIT13< 


- 20000 


BIT12< 


10000 


BIT11< 


>- 4000 


BIT 10' 


» 2000 


BIT09. 


1000 


BIT08' 


>. 400 


BIT07- 


'* 200 


BIT06< 


.. 100 


8IT05« 


40 


BIT04< 


.. 20 


BIT05- 


.. 10 


BIT02' 


>> 4 


BIT01< 


'• 2 


BITOO< 


1 


BIT9-' 


• BIT09 


BIT8-- 


> BITOa 


BIT7-' 


• BIT07 


BIT6-' 


' BIT06 



000040 
000020 
OOOOlO 
00O0O4 
000002 
000001 



000040 
000037 
000036 
000035 
000034 



SEO 31 



BITS" 
BIT4.. 
BIT3-- 
BIT2-. 
BIT1-- 
BIT0-- 



BIT05 
BIT04 
BIT03 
BIT02 
BITOl 
81 TOO 



I EVENT FLAG DEFINITIONS 

; EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COHMUNICATION 



EF.START-* 32. 

EF. RESTART-. 31. 

EF. CONTINUE-- 30. 

EF.NEW-- 29. 

EF.PUR-- 28. 



s START COrtlAND UAS ISSUED 

I RESTART COrtlANO WAS ISSUED 

s CONTINUE COrtlAND UAS ISSUED 

J A NEW PASS MAS BEEN STARTED 

J A POWER FAIL/POWER UP OCCURRED 



1257 



000340 
000300 
000240 
000200 
000140 
000100 
000040 
000000 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 



; PRIORITY LEVEL DEFINITIONS 

PRI07-- 540 
PRI06-- 300 
PRI05-- 240 
PRI04»« 200 
PRI03-- 140 
PRI02-- 100 
PRI01-- 40 
PRIOO-- 0 

loPERATOR FLAG BITS 



EVL-- 
LOT-- 
A0R-- 
IDU-- 
ISR-- 
UAM-- 
BOE--^ 
PNT-- 
PRI-- 
IXE-- 
IBE-- 
IER-- 
L0E-- 
MOE" 



4 

10 
20 
40 
100 
200 
400 
1000 
2000 
4000 
10000 
20000 
4000C 
100000 



CZOHVBO DW II FUNC TST PARTS 
GLOBAL eOCiATES SECTION 

1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 

1279 002214 000200 

1280 002216 000204 

1281 002220 177777 

1282 002222 000 

1283 002223 004 

1284 002224 000000 
1285 

1286 
1287 
1288 

1289 002226 

1290 002226 160020 

1291 002230 160022 

1292 002232 160024 

1293 002234 160026 
1294 

1295 002236 160030 

1296 002240 160032 

1297 002242 160034 
1296 002244 160036 
1299 

1300 
1301 
1302 

1303 002246 OOOOOO 

1304 002250 OOOOOO 

1305 002252 OOOOOO 

1306 002254 000001 

1307 002256 OOOOOO 

1308 002260 031463 

1309 002262 146314 

1310 002264 OOOOOO 

1311 002266 OOOOOO 

1312 002270 OOOOOO 

1313 002272 OOOOOO 

1314 002274 OOOOOO 

1315 002276 OOOOOO 

1316 002300 OOOOOO 

1317 002302 OOOOOO 
1318 

1319 
1320 

1321 002304 177546 

1322 002306 000300 
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SEO 



.SBTTL GLOBAL DATA SECTION 



t THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
I IN MORE THAN ONE TEST, 
i - - 



UNIT VARIBLE AREA 



RXVECA 
TXVECA 
ACTLNS 
LOPBCK 
BRLEVL 
UNITN: 



.WORD 200 

.UORO 204 

.WORD 177777 

.BYTE O 

.BYTE 4 

.UORO 0 



iRX VECTOR ADDRESS. 
iTX VECTOR ADDRESS. 
{ACTIVE LINE BIT HAP. 
iLOOPBACK HOPE 

t INTERRUPT BUS REQUEST LEVEL 
lUNIT NUMBER. 



DEVICE REGISTER ADDRESS TABLE 



ORAORTi 
CSRA- 

RXTHA:: RBUTA 
LPRA: 

FOATA:: FSLSA 



LNCTRA: 
TXADIA: 
TXAD2A: 
TXBFCA: 



.UORD 
.UORD 
.WORD 
.UORD 



160020 
160022 
160024 
160026 



.UORO 160030 

.WORD 1600S2 

.UORO 160034 

.UORD 1600S6 



tOHU-11 CSR ADDRESS. 

iDHU-11 RECIEVE BUFFER/TIHER ADDRESS. 
lDHU-11 LINE PARAMETER REGISTER ADDRESS. 
tOHU-11 FIFO SIZE/LINE STATUS REGISTER ADDRESS. 
lAND FIFO DATA REGISTER ADDRESS. 
tOHU-11 LINE CONTROL REGISTER ADDRESS. 
lDHU-11 TRANSMIT BUFFER 1 REGISTER ADDRESS 
lOHU-ll TRANSMIT BUFFER 2 REGISTER ADDRESS 
iDHU-11 TRANSMIT BUFFER COUNT REGISTER ADDRESS 



ASSORTED GLOBAL VARIABLES: 



BUFPTR:: 
CTRLCF:: 
EXOERR: : 
TSTNUM: s 
lESTAT:: 
LGRPIM: : 
LGRPZM:: 
PASCNT:: 
RXINTC:: 
RXlNTFt J 
TXINTC;: 
TXINTF:: 
TP4VEC:s 
TP4FLG; : 
UOROl:: 



.UORO 
.UORO 
.UORD 
.UORD 
.UORD 



0 
0 
0 

1 

0 



UORO SI463 

.UORO 146S14 

.UORO 0 

.UORO 0 

.UORO 0 

.UORD 0 

.UORO 0 

.UORO 0 

.UORD 0 

.UORO 0 



I STORAGE FOR RECEIVE CHARACTER BUFFER POINTER, 
t STORAGE FOR THE CONTROL -C FLAG. 
I "EXIT ON ERROR- FLAG. 
•STORAGE FOR THE TEST NU»fiER. 

t STORAGE FOR STATES OF THE OUT INT ENABLE BITS. 
iBIT MAP OF LINES IN LINE GROUP I. 
iBIT HAP OF LINES IN LINE GROUP II. 
tSTO'G FOR PASS COUNT USED IN ROM VERSION* TST. 
I STORAGE FOR ICCEIVER INTERRUPT FLAGS, 
t STORAGE FOR RECEIVER INTERRUPT FLAGS. 
iSTORAK fOR TRANSMIT INTERRUPT COUNT. 
{STORAGE FOR TRANSMIT INTERRUPT FLAGS. 
{STORAGE FOR THE NORMAL 004 TRAP VECTOR. 
{FLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS. 
•LOCATION FOR PASSING INDIRECT PARAMETERS. 



LINE TIME CLOCK VARIABLES AND STORAGE. 



CLKCSR:: .UORD 177546 
CLKBRL:: .UORO PR 106 



{CSR ADDRESS OF THE LTC. 

{INTERRUPT PRIORITY LEVEL OF THE LTC. 
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002310 


000100 




CLKVEC : : 


.WORD 


100 I INTERRUPT VECTOR ADDRESS OF THE LTC. 


1324 


002312 


000074 




CLKHRZ: : 


.UORO 


60. 1 INTERRUPT FREQUENCY OF THE LTC. 


1325 


002314 


000000 




TIMERl:: 


.WORD 


0 t HARDWARE CLOCK COUNTER 91. 


1326 


002316 


000000 




TIMER2: : 


.WORD 


0 1 HARDWARE CLOCK COUNTER <^2. 


1327 


002320 


000170 




TIHER3: : 


.WORD 


120. t HARDWARE BREAK COUNTER LOCATION. 


1328 


002322 


000170 




BCOUNT : : 


.UORO 


120. 1 BREAK COUNT VALUE IN CLOCK TICKS. 


1329 


002324 


000021 




MSTICK:: 


.UORO 


17. iNUMBER OF MILLI*SEC0NDS PER LTC TICK. 


1330 


002326 


000062 




MSLCNT:: 


.WORD 


62 tLOOP COUNT (USED BY MSLOOP) TO DELAY 1 MS. 


1331 














1332 














1333 






1 


MEMMORY 


MANAGEMENT VARIABLES AND FLAGS. 


1334 














1335 


002330 


177572 




MhSRO: : 


.UORO 


177572 t ADDRESS OF MEM MGT STATUS REGISTER 


1336 


002332 


000000 




MMPRES:: 


.WORD 


0 I MEM MGT PRESENT FLAG CO IF MM NOT PRESENT). 


1 XX7 

XOO r 




www 






.WORD 


0 iMEM MGT ENABLED FLAG (0 IF MM NOT ENABLED). 


1336 














1339 














1340 






I 


TABLE OF 


UOROS 


WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 


1341 
1342 


002336 


000001 


BITTBL: 


.UORO 


1 


iBIT 0 SET. 


1343 


002340 


000002 




.WORD 


2 


iBIT 1 SET. 


1344 


002342 


000004 




.UORO 


4 


iBIT 2 SET. 


1345 


002344 


000010 




.UORO 


10 


iBIT 3 SET. 


1346 


002346 


000020 




.UORO 


20 


jBIT 4 SET. 


1347 


002350 


000040 




.UORO 


40 


iBIT 5 SET. 


1348 


002352 


000100 




.UORO 


100 


iBIT 6 SET. 


1349 


002354 


000200 




.UORO 


200 


iBIT 7 SET. 


1350 


002356 


000400 




.UORO 


400 


iBIT 8 SET. 


1351 


002360 


001000 




.UORO 


1000 


tBIT 9 SET. 


1352 


002362 


002000 




.UORO 


2000 


iBIT 10 SET. 


1353 


002364 


004000 




.UORO 


4000 


iBIT 11 SET. 


1354 


002366 


010000 




.UORO 


10000 


iBIT 12 SET. 


1355 


002370 


020000 




.UORO 


20000 


iBIT 13 SET. 


1356 


002372 


040000 




.UORO 


40000 


iBIT 14 SET. 


1357 


002374 


100000 




.UORO 


100000 


iBIT 15 SET. 


1356 














1359 














1360 






I* 


GPR SAVE AREAS 


ZERO AND ONE. 


1361 














1362 


002376 




GPRSOB: 






iBASE OF GPR SAVE AREA NUMBER ZERO. 


1363 


002376 


000000 




'.UORO 


0 


tWQRO I. STORAGE FOR RI. 


1364 


002400 


000000 




.UORO 


0 


lUGRD 2. STORAGE FOR R2. 


1365 


002402 


000000 




.UORO 


0 


lUORO 5. STORAGE FOR R3. 


1366 


002404 


000000 




.UORO 


0 


lUOM) 4. STORAGE TOR R4. 


1367 


002406 


000000 




.UORO 


0 


lUORO 5. STORAGE FOR RS. 


1368 














1369 






I 


STORAGE 


AREA FOR THE BHP CODE QUEUE. 


1370 














1371 


002410 


000000 


BMPCQP: 


• 


.WORD 


0 iPOINTER USED TO ACCESS THE NEXT CELL IN QUE. 


1372 


002412 




BMPCQB! 


* 


.BtKW 


64. t STORAGE FOR 32 CELLS. TEST* PLUS BMP CODE. 


1373 


002612 




BMPCQEt 


• 
• 




iLAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 


1374 














1375 














1376 






1 


STORAGE 


AREA FOR ERROR SUHMARY TABLE AND FLAGS. 


1377 














1378 


002612 


000000 


ERSMRF; 


a 


.WORD 


0 t ERROR SUMHARV TLAGS. 


1379 


002614 




ERCNTB: 


• 


.BLKU 


16 t TABLE OF ERROR COUNTS. 



002650 
002650 
003250 
003450 
003650 
003650 



003710 



CZOHVBO OMU 11 fUNC 
GLOBAL DATA SECTION 



1380 
1381 
1382 
1383 
1384 
1385 
1386 
1387 
1388 
1389 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 
1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
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003750 
003750 
003752 
003754 
003756 
003760 
003762 
003764 
003766 
003770 
003772 
003774 
003776 
004000 
004002 
004004 
004006 
004010 



004010 
004010 
004011 
004012 
004013 
004014 
004015 
004016 
004017 
004020 
004021 



000000 
000002 
000004 
000006 
000010 
000012 
000014 
000016 
000020 
000022 
000024 
000026 
000030 
000032 
000034 
000036 



000 
001 
002 
003 
004 
005 
006 
007 
010 
Oil 



GENERAL TABLE AND BUFFER AREA- -513 WORDS. 



BUFBAS 
ERLTBL 
CUFMID 
BUF3QT 
BUFEND 
ENDETB 



I BASE OF MEMORY BUFFER. 
.BLKW 128. iFIRST HALF OF GENERAL TABLE OR BUFFER, 
.BLKU 64. I SECOND HALF OF GENERAL TABLE OR BUFFER. 

.BLKU 64. I LAST QUARTER OF THE BUFFER AREA. 

J END OF GENERAL PURPOSE MEMORY BUFFER. 
.BLKU 16. iBUFFER OVERFLOW SPACE. 



RXCNTB: 



RECEPTION TABLE OF COUNTERS 
.BLKW 16. {RECEPTION CHARACTER COUNTERS TABLE. 



TABLE FOR STORAGE OF RX/TX LINE NUMBER ASSOCIATIONS. 
2* THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 
WHEN ACCESSING A TABLE OF WORDS. 

NOTE: DO NOT WRITE A NON^ZERO VALUE INTO THE UPPER BYTE OF ANY ENTRY. 



TXRXLB: 



iBASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 



TXRXLE:: 



.WORD 


0 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


0. 


.UORO 


2. 


t TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


1. 


.WORD 


4. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


2. 


.WORD 


6. 


t TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


3. 


.WORD 


6. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


4. 


.UORD 


10. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


5. 


.UORO 


12. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


6. 


.UORO 


14. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


7. 


.UORO 


16. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


8. 


.UORO 


la. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


9. 


.UORO 


20. 


i TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


10. 


.UORO 


22. 


t TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


11. 


.UORO 


24. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


12. 


.UORO 


26. 


1 TX/RX LINE 


OFFSET 


FOR RX/TX 


LINE 


13. 


.UORO 


26. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


14. 


.UORO 


SO. 


1 TX/RX LINE 


OFFSET 


FOR 


RX/TX 


LINE 


15. 






lEND OF TX/RX LINE 


MffiER ASSOCIATION 


.EVEN 




iGUMANTEE 


THAT NEXT TABLE IS ON UOM> 



* TABLE FOR STORAGE OF RX/TX LINE NUMBER ASSOCIATIONS. 

* THE ASSOCIATIONS ARE STOREO AS LINE NUMBERS UHICH CAN BE USD AS SUCH OR 

* AS OFFSETS UHEN ACCESSING A TABLE OF BYTES. 



TXRLNB: 



.BYTE 
• BYTE 
.BYTE 
.BYTE 
.BYTE 
.BrTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



0 

1. 

2 

3. 

4. 

5. 

6. 

7. 

a. 

9. 



iBASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

1 TX/RX LINE FOR RX/TX LINE 0. 

t TX/RX LINE FOR RX/TX LINE 1. 

I TX/RX LINE FOR RX/TX LINE 2. 

t TX/RX LINE FOR RX/TX • ^ne 3. 

I TX/RX LINE FOR RX/TX u.NE 4. 

I TX/RX LINE FOR RX/TX LINE 5. 

I TX/RX LINE FOR RX/TX LINE 6. 

J TX/RX LINE FOR RX/TX LINE 7. 

, TX/RX LINE FOR RX/TX LINE S. 

J TX/RX LINE FOR RX-'TX LINE 9. 
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SEQ 



1437 


004022 


012 




no40P^ 


013 


1459 


004024 


014 


1440 


004025 


015 


1441 


004026 


016 


1442 


004027 


017 


1445 


004030 




1444 






1445 






1446 






1447 






1446 






1449 






1450 






1451 






1452 


004030 




1453 


004030 


004 


1454 


004031 


006 


1455 


004032 


000 


1456 


004033 


002 


1457 


004034 


014 


1458 


004035 


016 


1459 


004C36 


010 


1460 


004037 


012 


1461 


004040 


024 


1462 


004041 


026 


1463 


004042 


020 


1464 


004043 


022 


1465 


004044 


034 


1466 


004045 


036 


1467 


004046 


030 


1466 


004047 


032 


1469 






1482 


004050 
004050 






004050 


000000 




004052 


000000 




004054 


000000 




004056 


000000 


1483 







TXRLNE: 



.BYTE 
.BTTE 
.BTTE 

• BYTE 
.BYTE 

• BYTE 

.EVEN 



10. 
11. 
12. 
13. 
14. 
15. 



jTX/RX LINE FOR RX/TX LINE 
iTX/RX LINE FOR RX/TX LINE 
iTX/RX LINE FOR RX/TX LINE 
iTX/RX LINE FOR RX/TX LINE 
iTX/RX LINE FOR RX/TX LINE 
iTX/RX LINE FOR RX/TX LINE 



10. 
11. 
12. 
13. 
14. 
15. 



I END OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
I GUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 



i* TABLE OF TX/RX LINE NUMBER ASSOCIATIONS IN STAGGERED LOOPBACK. 

:* THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMFS 2 FOR USE AS OFFSETS 

i* WHEN ACCESSING A TABLE OF WORDS. 

t* THIS IS A TABLE OF DATA FOR READING ONLY. USE TO LOAD THE ABOVE T^BLE. 
i* NOTE: MUST CONVERT FROM BYTES TO WORDS WHEN LOADING ABOVE TABLE. 



STGTRB: 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
•BYTE 
.BYTE 
.B^-TE 
.BYTE 
.EVEN 
ERRTBL 



ERRTYP 
ERRNBR 
ERRMSG 
ERR6LK 



4. 

6. 

0 

2. 

12. 

14. 

8. 

10. 

20. 

22. 

16. 

18. 

28. 

50. 

24. 

26. 



.WORD 
.WORD 
.WORD 
.WORD 



0 
0 
0 
0 



I BASE OF STAGGERED TX/RX 1 INE NUMBER TABLE. 

I TX/RX LINE OFFSET FOR RX/TX LINE 0. 

I TX/RX LINE OFFSET FOR RX/TX LINE 1. 

t TX/RX LINE OFFSET FOR RX/TX LINE 2. 

I TX/RX LINE OFFSET FOR RX/TX LINE S. 

I TX/RX LINE OFFSET FOR RX/TX LINE 4. 

I TX/RX LINE OFFSET FOR RX/TX LINE S. 

I TX/RX LINE OFFSET FOR RX/TX LINE 6. 

I TX/RX LINE OFFSET FOR RX/TX LINE 7. 

t TX/RX LINE OFFSET FOR RX/TX LINE 8. 

t TX/RX LINE OFFSET FOR RX/TX LINE 9. 

I TX/RX LINE OFFSET FOR RX/TX LINE 10. 

I TX/RX LINE OFFSET FOR RX/TX LUC 11. 

I TX/RX LINE OFFSET FOR RX/TX LDC 12. 

I TX/RX LINE OFFSET FOR RX/TX LINE 13. 

t TX/RX LINE OFFSET FOR RX/TX LIHE 14. 

s TX/RX LINE OFFSET FOR RX/TX LIME IS. 

tGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARt. 

LSERRTBL:: 



1484 



.EVEN 
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1486 


.Si 


1487 




1488 


; * 


1489 


; * 


1490 


5 ♦ 


1491 


{ * 


1492 


I * 


1493 


• * 


1494 




1495 




1496 


s * 


149/ 




1496 


s* 


1499 


1* 


1500 




1501 




1502 




1503 




1504 




1505 




1506 




1507 


1* 


1508 


1* 


1509 


1* 


1510 




1511 


1* 


1512 


1* 


1513 


1* 


1514 


I* 


1515 


1* 


1516 


I* 


1517 


1* 


1516 


1* 


1519 


1* 


1520 


I* 


1521 


1* 


1522 





.SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 



THERE ARE 4 ROUTINES AND HACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 

SAVE • MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
SAVE THE GPR CONTENTS FOR LATER RESTORATION. 

PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPR(S) INTACT (NOT RESTORED). 

PREG05 - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 

EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 

DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VAL'JES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOWING STACK FRAME: 

SP -> RET PC INTO PREGOS ROUTINE. 

SP*2 -> GPR RO CONTENTS. 

SP»4 -> GPR Rl CONTENTS. 

SP»6 -> GPR R2 CONTENTS. 

SP*8 -> GPR RS CONTENTS. 

SP*10 -> GPR R4 CONTENTS. 

SP*12 -> GPR R5 CONTENTS. 

SP*14 •> RET PC INTO CALLER OF SUB' TNE WHICH CALLED PREGOS. 

EACH LEVEL OF SUB' TNE CALLING USES 8 WORDS OF STACK OVER»CAD. 
THE SAVE AND PASS MACROS CAN ALSO BE USED IN "STRAIGHT LINE COOC" 
TO SAVE AND RESTORE T*C GPR VALUES. IN ANY CASE. AFTER THE 
ISSUING OF A PASS CALL THE GPRS WILL BE RESTORED TO THE VALUES 
THEY HAD PRIOR TO THE LAST SAVE CALL (EXCEPT FOR THE EXCEPTED. 
OR PASSED INTACT. GPRS SPECIFIED AS PARAMETERS TO THE PASS CALL) 
AND THE SP WILL ALSO BE RESTORED TO ITS CONDITION BEFORE TIC LAST 
SAVE CALL. THE PROOIAMMER MUST BE SURE THAT THE SP HAS THE SAME 
VALUE WHEN THE PASS MACRO IS CALLED AS IT HAD IWEOIATELY AFTER 
THE SAVE MACRO WAS CALLED. 
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SEQ 11 



1524 




1525 




1526 




1527 




1528 




1529 




1530 




1531 


000036 


153? 


000016 


1533 


000014 


1534 


000012 


1535 


000010 


153C 


000006 


1537 


000004 


1538 


000002 



.SBTTL GPR FRAME ACCESS EQUATES 
I ♦♦♦ 

THAT ALLOW ACCtSS TO THE STACK FRAME. THESE ARE THE 
'22\f^JJ ^^'^ REGISTERS SAVED DURING THE PREG05 



LPCSLT- 
PCSLOT- 
R5SL0T- 
R4SL0T- 
R3SL0T- 
R2SL0T" 
RISLOT- 
ROSLOT- 



36 » OFFSET FOR LAST RETURN PC 

16 .OFFSET FOR RETURN PC. 

14 » OFFSET FOR R5. 

12 s OFFSET FOR R4. 

10 I OFFSET FOR R3. 

6 lOFi-SET FOR R2. 

4 ;OFFSET FOR Rl. 

2 {OFFSET FOR RO. 



1 o 



1540 .SBTTL GLOBAL MACRO DEFINITION SAVE 

1542 lt******THlS*MACRO*IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

1543 CONTENTS OF THE GPRS RO THRU R5. 

1544 J 

1545 INPUTS: SP - UNCHANGED SINCE SUBROUTINE UAS ENTERED 

1546 R5SL0T - OFFSET TO STACK SLOT FOR R5 (EQUATED TO 14 OCTAL) 

1547 5 * 

1548 OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADEO WITH THE CONTENTS OF GPRS 

1549 TOP OF STACK LOADED WITH THE RETURN ADDRESS INTO PREG05 

1550 5 ♦ 

1551 CALLING SEQUENCE: SAVE 

1552 * ^ 

1553 COMMENTS: NO ARGUMENTS ARE ALLOWED. 

1554 s* TME PASS MACRO SHOULD BE CALLED 10 RESTORE THE GPR VALUtS. 
lilt ;* SUBORDINATE ROUTINES CALLED: PREGOS. 



1557 
1558 

1559 .MACRO SAVE 

1560 .LIST 

1561 JSR RS.PREGOS :CA..L REGISTER SAVE SUBRT. 

1562 .NLIST 

1563 .ENDM SAVE 



N3 
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1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1576 
1579 
1580 
1581 
1582 
1583 
1584 
1585 
1586 
1587 
1588 
1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 
1610 
1611 
1612 



MACRO M1200 
PASS - 



15 -MAR -64 09:29 PAGE 32 



SEQ 



.SBTTL GLOBAL MACRO DEFINITION 



PASS 



!* 

;* 
J* 
{♦ 
I* 

* 

* 

* 
* 
* 

* 

* 
* 

* 

* 

J* 
* 
* 
* 
* 

* 



THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 
CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 
CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 
RETURNING TO PREG05 TO RESTORE THE GPRS TO THEIR SAVED VALUES. 

INPUTS: ONLY ALLOWED ARGUMENTS ARE "RO" THRU "R5". 

ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
SLOT OFFSETS BEFORE CALLING THIS MACRO. 

OUTPUTS: THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 

CALLING SEQUENCE: PASS RO.Rl,... 

COMMENTS: ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
FOR EXAMPLE. THE FOLLOWING ARE LEGAL: 

PASS Rl 

PASS R4 . RO . R2 
THE GPRS LISTED AS 'ARGUMENTS UILL BE PASSED INTACT TO THE 
CALLING ROUTINE. ALL OTHER GPRS WILL BE RESTORED. 
THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 

THE MACRO CALL 

PASS RO . R3 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE: 

MOV RO.ROSLOT(SP) ;PUT RO IN STACK SLOT. 

MOV R5.R3SL0TCSP) jPUT R3 IN STACK SLOT. 

JSR PC.8(SP)» {RETURN TO PREG05 SUBRT. 

IN THIS EXAt«»LE GPRS Rl. R2. R4. AND R5 WILL BE RESTORED TO 
THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 

SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREG05. VALUE ON STACK.) 



.MACRO PASS A.B.C.D.E.F 
.IRP X.<A.B.C.O.E.F> 
.IF NB.X 

.LIST 

MOV X.X'SLOT(SP) 

.NLIST 
.ENOC 
.ENDM 
.LIST 

JSR PC.8(SP)» 

.NLIST 

.ENDM PASS 



;PUT X IN STACK SLOT. 



iRETURN TO PREG05 SUBRT. 
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1614 
1615 
1616 
1617 
1616 
1619 
16^0 
1621 
lb22 
1625 
1624 
1625 
1626 
1627 
1628 
1629 
1650 
1651 
1652 
1655 
1654 
1655 
1656 
1657 
1658 
1659 
1640 
1641 
1642 
1645 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1655 
1654 
1655 
1656 
1657 
1656 
1659 
1660 
1661 
1662 
1665 
1664 
1665 
1666 



004060 
004060 
004062 
004064 
004066 
004070 
004072 
004074 



004102 
004104 
004106 
004110 
004112 
004114 
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PREG05 



• PRESERVE REGISTERS RO THROUGH R5 TOR SUBROUTINE CALLS. 

• Iltf>OTS: THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE HuST BE IN 

• GPR R5. CLE.- MACROS USE "JSR R5.PREG05".) 

REGISTERS RO THROUGH R5 ARE SAVED ON THE STACK. 



• OUTPUTS: 
•CALLING SEQUENCE: 

^COMMENTS: 

* 
* 

* 
* 
* 

•SUBORDINATE ROUTINES CALLED: 



SAVE iHACRO EXPANSION CALLS PREG05. 

(SUBROUTINE COOEl... 

PASS iHACRO EXPANSION RECALLS PREG05. 

THIS ROUTINE IS RE-ENTRANT. 

PARATCTERS HAT BE PASSED OUT OF A SUBROUTINE BT HOOIfTlNG THE 
REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 
TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 
(EXAMPLE: MOV VALUE. ROSLOT(SP) 1 

MAKE SURE THE SP IS AT ITS ORIGINAL VALUE UHEN tOU DO THIS. 

NONE. 



010446 
010546 
010246 
010146 
010046 
010546 

016605 000014 



PREG05: 



004100 004756 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 



R4. (SP) 
R5. (SP) 
R2.-(SP) 
Rl.-(SP) 
RO.-CSP) 
R5.-(SP) 
R5SL0T(SP).R5 

PC.a(SP)« 



iRS HAS BEEN LOADED ON THE STACK Br THE SUBROUTINE CAcL 



I SAVE R4 
tSAVE R5 
I SAVE R2 
tSAVE Rl 
I SAVE RO 

iPUSH RETURN PC ON TOP OF STACK 
iRESTORE R5 TO VALUE IT HAD BEFORE CALLS 

iCALL THE SUBROUTINE AT THE RETURN ADDRESS 
{FROM THE PREG05 CALL. PUTTING THE PRESENT 
I PC ON THE STACK AS A RETURN ADDRESS INTO 
I THIS (PREG05) ROUTINE. 



!ri« FOLLOWING 
I "RETURN" (JSR 



CODE IS EXECUTED UHEN 
PC.a(SP)*1 USING THE 



THE CALLING ROUTINE 
PC DEPOSITED ON THE 



DOES A 
STACK ABOVE, 



012605 
012600 
012601 
012602 
012605 
012604 



PREGRTi 



004 116 000205 



I MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

RTS 



(SP)..R5 
(SP)..RO 
(SP)..Rl 
(SP)»,R2 
(SP)*.R5 
(SP)».R4 

R5 



iPUT RETURN PC IN R5. 
iRCSTORE RO. 
{RESTORE Rl. 
(RESTORE R2. 
I RES TORE R5. 
iRESTORE R4. 

(RETURN TO THE SUBROUTINE WHICH CALLED PREkK»5. 
(RESTORING R5 IN THE PROCESS. 



1676 
16 7Q 
1690 
1661 
1662 
1665 
1664 
1665 
1666 

1667 004120 
004120 
004120 
004 12S 
004126 

1666 
1694 
1695 
1696 

1697 004150 
0041S0 

T2/ 



1696 
1699 
1706 



TbT MACRO 11200 15 HAR 64 09:26 PAGE S4 

.SBTTL GLOBAL TEXT SECTION 



104 

055 
000 



110 
061 



125 
061 



004150 


104 


110 


125 


004155 


055 


061 


061 


004156 


040 


106 


125 


004141 


116 


105 


040 


004144 


124 


125 


124 


004147 


040 


120 


101 


004152 


122 


124 


062 


004155 


000 







THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS. 
MESSAGES. AND ASCII INFORNATION THAT ARE USED IN 
MORE THAN ONE TEST. 



NAMES OF DEVICES SUPPORTED Bv PROGRAM 
DEVTYP <DHU-11> 



LIDVTYP: : 



.ASflZ /DMUll/ 
.EVEN 



I TEST DESCRIPTION 
* DESCRIPT 



<DMU 11 FUNC TST PART2> 



LtDESC:: 



.ASCIZ /DHU-11 FUNC TST PAR 



.EVEN 



.EVEN 
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1715 
1716 
1^17 
1718 
I7l<» 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1729 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1736 
1739 
1740 
1741 



.NLIST BIN 



004156 
004163 
004215 
004270 
004320 
004350 
004417 
004455 
004537 
004611 
004640 
004670 
004721 
004745 
005034 
005053 
005131 
005231 



EF0503 
EF1601 
EF5801 
EF5901 
Er5902 
Er6401 
Er7801 
EF9001 
EF9002 
EF9003 
EF9004 
EF9005 
EF9006 
EF9010 
EF9019 
EF9301 
EF9302 
MFUNIT 



.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.EVEN 



FORMAT STATEMENTS USED IN PRINT CALLS 



/«A «T«A. TEST ABORTED «N/ 

/«A RXTIMER VALUE USED WAS :«D3«A (0)«N/ 

/tfA EXPECTED :«03«A(D)tfN/ 

/«A ACTUAL :«D3«A(D)M/ 

/«A «D2«N/ 

/«T«A ON LINE «D2«A DECIMAL .«N/ 

/«A UNEXPECTED «T«A FOUND IN RECEIVE CHAR FIF0:«N/ 
/«A CODE IS ASSOCIATED WITH LINE: *02*N/ 

CODE IS: «03«N/ 
/«A «T«A VALUE: «03«N/ 
/«A «T«A VALUE: NONEtfN/ 
/«A tfT«A «02«A(D)«N/ 

/tfA NUMBER OF ERRORS DETECTED ON LINE «D2«A IS «D5«N/ 
/#A «T«02«A(0). BMP CODE REPORTED :tfOSM(0)«N/ 

/tfA OVERFLOU OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE )«N/ 
/«MA TESTING UNIT :«04«N/ 

.LIST BIN 
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SEO 43 



1 ' ->U 












.NLIST 


BIN 










1 TCI 

1 / D5 








1 

1 








1 <^I>!> 








I 'JO 


QUDcOc 


cflOlOo 




Acr* T7 


1 TC 7 


AACYOA 


cnloOl 




,ASCIZ 


1 TCA 

1 r 


AACLA AT 


AA 1 

tn4wi 




.ASCIZ 


1 fO^ 


AACA 


CM^ AAO 




.ASCxZ 


1 7<LA 

1 f oO 


AAC^ 7 1 


CMA 1 AI 




.ASCIZ 


1 1^ 1 

1 /^ol 




1 AO 




AC^T7 


I ft)? 


AACLCC7 


CMA 1 AT 




•ASCIZ 


1 741 T 




PMAOA1 




ACf*T7 


1 f^H 


AAQ^7^ 






•AbLlZ 


1 74LQ 


AAC71 7 


CMAQA1 




AC^T7 

. .AdLiZ 


1 ' 00 


AA^7^A 


PMAQAp 






1 7^7 
1 f 0 f 


AA4LA1 0 


cro\A/X 




ACCT7 


1 74LA 


AAtfLA*l1 


PMSI 01 
croxux 




ACCTT 

• AbLXZ 


1 7AO 
1 't>^ 


VlUOXvO 


CMS 




. HbLX^ 


1 77n 


UUOX44 


PMSI 




AC#*T7 


1 771 


A/WLI 7 A 
VlUOX 


Cri^cVX 




•MbLXZ 


1 770 

Lite. 


/VMLDD7 






ACPT7 


1 77X 


UUOcOD 


PHSX01 




JICCT7 


1 77A 


AAJLHOI 
UUOOcX 


PMSYAO , 




ACCT7 

.AbLXZ 


1 77«> 


V/VO^UX 






ACPTT 
• HbLXZ 




A/WLACO 


PMSAAI < 
tnD^UX ! 




AC^T7 

AbLXZ 


1 777 


AAj;.^OA 
UUO^cU 


PMSAAO < 




ACr'TT 

. AbLXZ 


1 77A 


VlUODOX 


PMSS/M . 

cn^DUX : 




ACCT 7 


1 7 70 


UVOOcO 


PMSi^AI < 
CrOOvX ; 




ACf*T7 


1 7An 


AA4^7AO 
UUO r U4: 


tnD f ux ; 




AC^TT 

, AbcXZ 


1 7A1 

1 r OX 


nA^7^7 
UVO f D ( 


PMSAAI « 




AC<*TT 


1 7AD 
1 f Oc 


AA7AAT 


PMSA/ID < 




Ae^T7 


1 7A^ 

1 r 00 


nft7n77 


PMSAA'V 4 

crooud : 




. •AbCXZ 


1 7Ad 
1 r 0^ 


UU r cUX 


PMSAAA < 




• AbCIZ 


1 7A^ 

X f O^ 




PMSAAS 
C<wOU3 . 




AC<*T 7 

.MbCXZ 


1 7AA 
1 f 00 


UU f <MO 


PMSQAI • 

C«07\/X ! 




•AbUXZ 


1 7A7 
1 ' 0 f 








. AbCXZ 


1 7AA 

X f 00 


VV f ^ f 0 






•AbCXZ 


1 7AQ 
X r 0^ 








• AbLXZ 


1 7QO 
X f ^fV 


W f OD^ 






ACCT7 

•AbLXZ 


1 7Q1 
X ' ^X 


nft77^A 


PMIUV)1 < 




ACCT7 


1 7QP 


XV\AJV 






ACr*T7 

•AbLXZ 


1 7Q^ 


A1 nfSArx 
vx 






• AbLXZ 


1 7QA 

X r 


ni Ai OA 






ACrT7 
•HbLX^ 


1 7Q^ 


A1 01 4LC 

VXUXOD 






•AbLXZ 




V X vc:^ ^ 






ACCT7 


1 7Q7 


01 A»A7 


Eh6401 




flCf'T7 
»AbLX^ 


1 7QA 


A« A«AA 


EM6402 




ACrT7 
• Abl»X^ 


1 7QQ 


At AdO^ 


EM6601 




•AbWX^ 


1 AlV) 


A| AdAO 


Eh6602. 




AcrT7 


1 AA1 
xovx 


vxv^ x^ 


EW6701 








Ai ASA A 


EH6702 




. ASCIZ 


1803 




EH9009 




: .ASCIZ 


1804 


010647 


FM9010 




! .ASCIZ 


1805 


010673 


EM9014 




. .ASCIZ 


1806 


010767 


EM9017 




.ASCII 



GLOBAL ERROR HESSAGES 



/DEVICE REGISTER ACCESS ERRORS/ 

/TIMEOUT OCCURRED WAITING TOR MASTER RESET TO CLEAR/ 
/DMA START BIT TEST FAILED/ 
/DMA.START BIT BAD ON LINE: / 
/OMA.ABORT BIT TEST FAILED/ 
/DMA.ABORT BIT BAD ON LINE: / 

/DMA.START BIT FOUND SET AFTER DMA ABORTED ON LINE: / 

/DMA.ERROR BIT TEST FAILED/ 

/DMA.ERROR BIT BAD/ 

/OAUTO (INACTIVE) BIT TEST FAILED/ 

/ OAUTO BIT BAD ON LINE: / 

/OAUTO (ACTIVE) BIT TEST FAILED/ 

/lAUTO (INACTIVE) TEST FAILED/ 

/lAUTO BIT FOUND SET ON LINE: / 

/lAUTO BIT BAD ON LINE: / 

/lAUTO (ACTIVE) TEST FAILED/ 

/lAUTO BIT FCXJND CLR ON LINE: / 

/FIFO VALID DATA TEST FAILED/ 

/FIFO BAD. DATA FIELD CORRUPTED. TEST USED LINE:/ 
/BMP CODE FOUND IN FIFO. TEST INVAILDATEO/ 
\FIFO 3/4 ALARM (INACTIVE) TEST FAILEON 
/FIFO BAD. ALARM SIGNAL DEFECTIVE/ 
\FIFO 3/4 ALARM (ACTIVE) TEST FAILED\ 
\FIFO 3/4 ALARM (ACTIVE/INACTIVE) TEST FAILED\ 
\FIFO 1/2 LEVEL (ACTIVE/INACTIVE) TEST FAILEDX 
/RXTIMER TEST FAILED/ 

/RXTIMER BAD. RX-INT DELAYED BY URONG NUMBER OF MILLISECONDS/ 
\RXTIMER BAD. RX-INT DIDN'T OCCUR IMMEDIATELY UITM RXFIFQ 3/4 FULLV 
/RXTIMER BAD. RX-INT OCCURED UITH RXTIMER VALUE ZERO/ 
/RXTIMER BAD. TIME-OUT OCCURED UAITING FOR RX-INT/ 
/ TX- ACT ION FIFO TEST FAILED/ 

/ TX.ACTION FII--0 BAD. TX-ACTION RECIEVED FROM THE MRONG LINE/ 

/ TX ACTION FIFO BAD. INCORRECT NUMBER OF TX -ACTIONS FOUND/ 

/ TX.ACTION FIFO BAD, TX-ACTION FIFO MOULD NOT EMPTY/ 

/ TX INTERRUPT OCCURED AFTER THE TX.ACTION FIFO MAO BEEN EMPTIED/ 

/TX FIFO TEST FAILED/ 

/INCORRECT VALUE IN FIFOSIZE REG/ 

/MORE THAN ONE TX-INT OCCURED.FROM A FULL TXFIFQ/ 

/TX FIFO BAD. RECIEVED CHAR INCORRECT/ 

/TX FIFO BAD. CHARACTER RECIEVED ON WRONG LINE/ 

/TX FIFO BAD. TOO FEW CHARS RECIEVED/ 

/BREAK GENERATION TEST FAILED/ 

/ BREAK NOT RECEIVED ON LINE(S):/ 

/NO OVERRUN ERROR TEST FAILED/ 

/ OVERRUN ERROR REPORTED WHEN NONE FORCED/ 

/OVERRUN ERROR TEST FAILED/ 

/ NO OVERRURN ERROR REPORTED. OVERRUN FORCED/ 
/EXPECTED OR CORRECT/ 
/ACTUAL OR MEASURED / 

/SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:/ 
/ FIFO WILL NOT PURGE (DATA. VALID STUCK SET),/ 



hLUBXt^T^xY i^CTVofi ^^^^2 MACRO M1200 15 MAR 84 09:28 PAGE 36 1 

1807 011044 .ASCIZ / REMAINDER OF TEST SKIPPED./ 

1808 011100 EM9026:: .ASCIZ / LPR CONTENTS: / 

1809 011124 EM9104:: .ASCIZ / UNEXPECTED DATA FOUND IN FIFO FROM LINE: / 

1810 011200 EM9501:: .ASCIZ /BMP CODES UERE REPORTED DURING THIS DIAGNOSTIC/ 

1811 011257 EM9302:: .ASCIZ /BMP CODE FOUND IN TEST / 

1812 011307 EM9305:: .ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST / 

1813 011354 EM9304:: .ASCIZ /UNEXPECTED BMP CODES FOUND DURING THIS PASS/ 

1814 «EVEN 

1815 .LIST BIN 
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1824 

1825 

1826 .SBTTL GLOBAL ERROR REPORT SECTION 
1827 

1828 I ♦ ♦ 

1829 I THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGfc PRINTING AREAS 

1830 I USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 

1831 I (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

1832 I - - 
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18S4 

1835 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 



1858 

1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1669 



1870 
1871 
1872 



1873 



011430 
011430 
011430 
011430 

011434 
011440 
011444 



011446 
011452 
011454 
011454 
011460 
011464 
011466 
011470 
011474 
011500 
011502 
011502 
011506 
011512 
011514 
011516 
011522 
011522 
011526 
011532 
011554 
011536 



032705 
001410 

012746 
012746 
010600 
104414 

062706 
032705 
001410 

012746 
012746 
010600 
104414 

062706 

012746 
012746 
010600 
104415 

062706 
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SEQ 



004567 172424 

012700 000100 

046700 170544 
001036 



000001 



011546 
000001 



000004 
000002 



011624 
000001 



000004 

011703 
000001 



000004 



EROlOl - 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 
ACCESS TEST). IF THE "EXTENDED ERROR INFO" OPTION HAS BEEN SELECTED 
THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR URITE OR 
BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP). A MESSAGE INDICATING 
THAT THE OHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO »RINTED. 

INPUTS: R5 - ERROR FLAG WORD. 

IF BIT 0 IS SET. A READ ERROR OCCURED. 
IF BIT 1 IS SET. A WRITE ERROR OCCURED. 

OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQUENCE: INCLUDE THE LABEL "EROlOl" AS THE MESSAGE POINTER 

PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



* COMMENTS: 

* SUBORDINATE ROUTINES USED: NONE. 



BGNHSG EROlOl 



SAVE 



MOV 
BIC 
BNE 



EROlOl: : 
:SAVE THE GPR CONTENTS. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT. 

•6IT06.ro j SET -up THE BIT MAP FOR •RE'»ORT EXT'D ERROR INFO' 

OPT ION. RO {TRY AND CLEAR THE FLAG. 

6» lEXIT IF OPTION NOT SELECTED. 



TrEPORT extended ERROR INFOMATION 

I - 



2(: 



4$: 



BIT •eiTO.RS 
BEQ 2% 
PR'XNTB tnSGl 



BIT «eiTl.RS 
BEQ 4« 
PRINTS •MSG2 



PRINTX •MSGS 



{TEST FOR READ ERROR. 

(SKIP READ ERROR MSG IF NO READ ERROR. 
tPRINT READ ERROR MESSAGE. 



J TEST FOR WRITE ERROR. 
{SKIP WRITE ERROR MSG IF 1^ 
{PRINT URITE ERROR MESSAGE. 



HOV 


OMSGl. -(SP) 


MOV 


^1. (SP) 


HOV 


SP.RO 




CIPNTB 


ADO 


^4.SP 


URITE ERROR 




MOV 


««SG2, -(SP) 


MOV 


M.-(SP) 


MOV 


SP.RO 


TRAP 


CSPNTB 


ADO 


M.SP 


WRONG ADDRESS. 


MOV 


^5G3, (SP) 


MOV 


♦1. CSP) 


MOV 


SP^RO 


TRAP 


C»PNTX 


ADD 


*4.SP 
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1874 011542 








011542 


004736 






1875 011544 








011544 








011544 


104423 






1876 








1877 011546 


045 


101 


102 


011551 


125 


123 


040 


011554 


124 


111 


115 


011557 


105 


055 


117 


011562 


125 


124 


040 


011565 


124 


122 


101 


011570 


120 


040 


103 


011573 


101 


125 


123 


011576 


105 


104 


040 


011601 


102 


131 


040 


011604 


122 


105 


101 


011607 


104 


040 


101 


011612 


124 


124 


105 


011615 


115 


120 


124 


011620 


056 


045 


116 


011623 


000 






1878 011624 


045 


101 


102 


011627 


125 


123 


040 


011632 


124 


111 


115 


011635 


105 


055 


117 


011640 


125 


124 


040 


011643 


124 


122 


101 


011646 


120 


040 


103 


011651 


101 


125 


123 


011654 


105 


104 


040 


011657 


102 


131 


040 


011662 


127 


122 


111 


011665 


124 


105 


040 


011670 


101 


124 


124 


011673 


105 


115 


120 


011676 


124 


056 


045 


011701 


116 


000 




1879 011703 


045 


101 


104 


011706 


110 


125 


040 


011711 


115 


101 


131 


011714 


040 


102 


105 


011717 


040 


101 


124 


011722 


040 


124 


110 


011725 


105 


040 


127 


011730 


122 


117 


116 


011733 


107 


040 


125 


011736 


116 


111 


102 


011741 


125 


123 


040 


011744 


101 


104 


104 


011747 


122 


105 


123 


011752 


123 


056 


045 


011755 


116 


045 


116 


011760 


000 







1580 
1881 



61: 



PASS 
ENOMSG 



JSR 



{RESTORE THE GPR CONTENTS. 

PC.SCSP)^ {RETURN TO PREG05 SUBRT. 



L 10002: 



TRAP 



CIMSG 



MSGl:: .ASCIZ /#ABUS TIME-OUT TRAP CAUSED BT READ ATTEMPT. #N/ 



MSC2:: .ASCIZ /#ABUS TIME OUT TRAP CAUSED Br URUE ATTEMPT .<N/ 



t1SG3:: .ASCIZ /#A0HU HAt BE AT THE URONC UNIBUS AOORESS.iiNM/ 



.EVEN 
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1883 
1884 
1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1895 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 

1902 011762 
011762 

1903 

1904 011762 012700 000100 

1905 011766 046700 170216 

1906 011772 001011 
1907 

1908 

1909 011774 

011774 010146 

011776 012746 004156 

012002 012746 000002 

012006 010600 

012010 104414 

012012 062706 000006 

1910 

1911 012016 
012016 

012016 104423 
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SBTTL GLOBAL ERROR REPORTING ROUTINE ER0503 



SEQ 



Iti^JLil ^f^f^OR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
MESSAGE UHOSE ADDRESS IS PASSED AS AN INPUT PARAmIter PROVIDED 
EXTENDED ERROR REPORTING HAS BEEN REQUESTED. »'HUVIOED 

Rl - ADDRESS Or THE HESSAGE TO PRINT, 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

LOAD THE ADDRESS OF THE MESSAGE IN Rl 
INCLUDE THC LABEL "ER050I" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER kRROR REPORT MACRO CALL. 

THE MESSAGE IS PRINTED AS BASIC ERROR ItTORMATION. 



* 
* 
* 
« 

♦ INPUTS: 

♦ OUTPUTS 

« CALLING SEQUENCE 
* 

« 

* COMMENTS: 

* SUBORDINATE 'ROUTINES USED: NONE. 



BGNHSG ER050S 



MOV •6IT06.ro 
BIC OPTION.RO 
BNE 21 



PRINTB •EF050S.R1 



ER0503: : 



J TRY TO CLEAR THE 

sEXT'O ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



{PRINT THE MESSAGE. 



2»: 



ENONSG 



L 10003: 



NOV Rl.-CSP) 

MOV «EF0503. (SP) 

MOV »2..CSP) 

MOV SP.RO 

TRAP CtPNTB 

ADO 46. SP 



TRAP C»HSG 
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1913 

1914 

191«^ 

1916 

1917 

1918 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 012020 
012020 

1936 012020 
012020 

1937 

1938 012024 

1939 012030 

1940 012034 
1941 

1942 

1943 012036 
012036 
012040 
012044 
012050 
012052 
012054 

1944 

1945 012060 

1946 012064 
012064 
012066 
012072 
012076 
012100 
012102 

1947 

1948 012106 
012106 

1949 012110 
012110 
012110 
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PAGE 40 



SEQ 4V 



004567 172034 



012700 
046700 
001024 



010146 
012746 
012746 
010600 
104414 
062706 

016702 

010246 
012746 
012746 
010600 
104414 
062706 



004736 
104423 



000100 
170154 



004156 
000002 



000006 
171770 



004163 
000002 



000006 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 



THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE. ALONG WITH A MESSAGE INFORMING THE OPERATOR WHICH^T^ IS 
2i2yieI2«8E ABORTED. PROVIDED EXTENDED ERROR INFOMATiS MAS BK 
REQUESTED. OTHERWISE ONLY A "TEST FAILURE" MESSAGE WILL BE PRINTED. 

"^^'^^NS THE ADDRESS OF THE MESSAGE TO BE PRINTED 
ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED. EG DMA? BREAK ETC 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" ^u^^m-c. 

INCLUDE THE LABLE "ER1603" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACROCALL 



* 
* 
* 
* 

* INPUTS: 
* 

* OUTPUTS 
* 

* CALLING SEQUENCE 
* 
* 

* COHTCNTS: 



* SUBORDINATE ROUTINES CALLED: NONE. 



BGNNSG ER1603 
SAVE 



JSR 



MOV 
BIC 
BNE 



•6IT06.ro 
OPTION.RO 
21 



PRINTB •EFOSOS.Rl 



ER1603:: 
{SAVE THE CONTENTS OF THE GPRS. 
RS.PREG05 iCALL REGISTER SAVE SUBflT. 

{TRY TO CLEAR THE 

tEXT'D ERROR REPORTING FLAG 

I EXIT IF FLAG NOT SET. 



{PRINT BASIC MESSAGE ON Cf^RATQRS CONSOLE. 



MOV ERRMSG. R2 
PRINTB «EF1601.R2 



{GET THE "TEST MESSAGE". 
{PRINT "TEST ABORTED" MESSAGE. 



MOV Rl. (SP) 

MOV flEF0503.-(SP) 

MOV 92. CSP^ 

MOV SP.RO 

TRAP C$PNTB 

ADO «6.SP 



MOV R2.-CSP) 

MOV «EF160l.-(SP 

MOV ♦S.-CSP) 

MOV SP.RO 

TRAP CtPNTB 

AOO 46. SP 



2t: 



PASS 
ENDMSG 



{RESTORL THE CONTENTS OF THE GPRS. 



JSR 



PC.eCSP)* 



{RETURN TO PREGOS SUBRT. 
L10004: 



TRAP 



1 Q^l 


.SB 


1 




1 QSY 




1 


I* 
• * 






J* 




19SA 

X 




X 7 




XTvV 




X7v X 


J* 

; A 


X 


1963 

X W-sJ 


X ^^"t 


;« 


X TViJ 


; A 


1966 


I* 


1967 

X * 


J* 
J* 


196 A 


1969 


1970 


5 ♦ 


1971 


1972 


1975 012112 
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SBTTL GLOBAL ERROR REPORTING ROUTINE ER5801 



3EQ 50 



012112 

1974 012112 

1975 012120 
1976 

1977 012122 
012122 
012124 
012130 
012134 
012136 
012140 

1978 012144 
012144 
012146 
012152 
012156 
012160 
012162 

1979 012166 
012166 
012166 



032767 
001422 



010146 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 
010600 
104414 
062706 



104423 



000100 170070 



004156 
000002 



000006 



004215 
000002 



000006 



THIS IS AN ERROR REPORTING ROUTINE WHICH PRINTS THE MESSAGE PASSED 
AS A PARAMETER IN Rl. AND THE RXTIMER VALUE IN R2. PROVIDED 
EXTENDED ERROR REPORTING HAS BEEN REQUESTED. ^-HOViOtD 
THIS ROUTINE IS USED BY THE RXTIMER TEST. 

INPUTS: Rl - ADDRESS OF THE MESSAGE TO PRINT. 

R2 RXTIMER VALUE. 

OUTPUTS: TH| gEfSJCE^'^OLLOWEO BY THE RXTIMER VALUE ARE PRINTED AT 



CALLING SEQUENCE: 



INCLUDE THE LABEL ER5801 AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



ItJ^rUIFJJSF.i^r^'^iSIKriiS BASIC ERROR INFORMATION AND THE 
RXTIMER VALUE IS PRINTED AS A 3 DIGIT DECIMAL NUMBER. 



;» SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER5601 

BIT «BIT06. OPTION 

BEQ 2» 

PRINTS «EF0503.R1 



ER5801:: 

iMAS EXTENDED ERROR REPORTING BEEN REQUESTED ' 
jEXIT WITH "TEST FAILED" MESSAGE IF NOT. 



PRINTS «EFSa01.R2 



2«: 



ENOnSG 



L10005: 



MOV 


Rl.-(SP) 




MOV 


«EF0503. 


-CSP) 


MOV 


•2.-CSP) 




MOV 


SP.RO 




TRilP 


CIPNTB 




AOO 


«6.SP 




MOV 


R2. CSP) 




MOV 


•EF5801. 


-CSP) 


MOV 


♦2. (SP1 




MOV 


SP.RO 




TRAP 


CIPNTB 




ADD 


•6.SP 




TRAP 


C»MSG 
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1981 

1982 

1983 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 

1999 

2000 

2001 

2002 

2003 012170 
012170 

2004 

2005 012170 
012170 

2006 

2007 012174 

2008 012202 
2009 

2010 
2011 
2012 
2013 

2014 012204 
012204 
012206 
012212 
012216 
012220 
012222 

2015 012226 
012226 
012230 
012234 
012240 
012242 
012244 

2016 012250 
012250 
012252 
012256 
012262 
012264 
012266 

2017 
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ER5901 - 

SBTTL GLOBAL ERROR REPORTING ROUTINE - ERS901 



SEO 



THIS IS AN ERROR REPORTING ROUTINE WHICH PRINTS AN AOOITIOMAL 
MESSAGE IN ADDITION TO THE "TEST FAILED" MESSAGE AND ALSO A 
r.ESSAGE SHOWING THE EX»»ECTcD VALUE OF A PIECE OF DATA AND THE 
gCTUAL VALUE OF THAT DATA. THE DATA IS PRINTED AS A 3 DIGIT 



INPUTS 



OUTPUTS 



Rl - CIXPECTED VALUC OF DATA, 

R2 - ACTUAL VALUE OF DATA. 

R3 - ADDRESS THE MESSAGE TO PRINT, 



MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
CALLING SEQUENCE: 



INCLUDE THE LABEL •ER5901" AS THE MESSAGE POINTER 
PARAMETER IN THE ORS ERROR REPORT MACROCALL. 



COMMENTS 



SUBORDINATE ROUTINES USED : NONE. 



BGNMSG ERS901 



004567 171664 

032767 000100 170006 
001433 



SAVE 



BIT 
BEQ 



JSR 

«BIT06.0PTiaN 
60* 



ER5901:: 

(SAVE THE GPR CONTENTS. 

R5.PREG05 sCALL REGISTER SAVE SUBRT, 

lEXXT THE ROUTINE IF EXTENDED 

t ERROR REPORTING IS NOT REQUESTED. 



> - 



REPORT EXTENDED ERROR INFQMAIION 



010346 
012746 
012746 
010600 
104414 
062706 

010146 
012746 
012746 
010600 
104415 
062706 

010246 
012746 
012746 
010600 
104415 
062706 



PRINTS tfEFOSOS.RS 



004156 
000002 



000006 



004270 
000002 



000006 



004320 
000002 



000006 



PRINTX «£F5901.Rl 



PRINTX «Er59«>.R2 



sPRINT THE MESSAGE. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

iRRINT THE 'EXPECTED VALUE- fCSSAGE. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

I PR INT THE -ACTUAL VALUE" MESSAGE. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



R3.-CSP5 

•EF0503. CSP) 

#2.-CSP) 

SP.RO 

OPNTB 

•6.SP 

Rl.-tSP) 
♦EF5901. -CSP) 
♦2. -CSP) 
SP.RO 
CtPNTX 
♦6.SP 

R2. CSP) 
♦EF5902. -CSP) 
♦2. -CSP) 
SP.RO 
C$PNT> 
«6.SP 



2018 012272 60»: PASS i RESTORE THE GPR CONTENTS. 

2019 ^ PC.OCSP)* jRETURN TO PREG05 SUBRT. 

2020 012274 ENOMSG 

0}il?J 104423 "-lOOOe: ^^^^ ^^^^^ 



CZOMVBO OHO 11 roNC rST 
CLOeAL CPROR RCPORTINC ROUTIME 



2022 
2021 
2024 
202b 
202t 
2027 
202B 
202"* 
2030 
2051 
20S2 
20S$ 
20U 
2055 
2036 
2057 
2056 
2059 
2040 
2041 
2042 
2045 
2044 
2045 
2046 
2047 
2046 
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ER6001 - 

.S8TTL GLOBAL £M»OR REPORTING ROUTINE 



SCO 



ER6001 



• THIS IS AN ERROR REPORTING ROUTINE UMICH PRINTS OUT A MESSAGE 

• AT THE CONSOLE I^TORMING T»C OPERATOR OF AN ERROR ON A PARTICULAR 

• LINE. THE ROUTINE ALSO PRINTS OUT A HESSAGE IKFORNING TNE OPERATOR 

• OF IMIT DATA MAS "EXPECTED" AND UHAT "ACTUAL" DATA MAS FOUND. IN THE 

• FORH OF A S DIGIT DECIMAL NUHBCR. 

• IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED THEN ONLt THE 

• "TEST FAILED- MESSAGE MILL BE PRINTED. 



• I»^TS 



• OUTPUTS 



Rl • EXPECTED DATA 

R2 • ACTUAL DATA 

R3 • ADDRESS OF T»C MESSAGE TO PRINT 

R4 • LIKE NUMBER ON MHICH THE ERROR OCCUREO 

MEfiSACiES ARE PRINTED AT THE OPERATOR CONSOLE 
" •*'«SSAGE' ON LINE •" 

"EXPECTED :" 

" ACTUAL :" O 



* CALLING SEQUENCE : 



INCLUDE THE LABLE -ER6001" AS THE ERROR ROUTINE 
POINTER PARAMETER IN THE ORS ERROR REPORT MACRO CALL, 



• SUBORDINATE ROUTINES CALLED : NONE 



2049 
2050 
2051 
2052 
2055 
2054 
2055 



2056 



2057 



2058 



012276 
012276 

012276 
012504 



012506 
012506 
0125iO 
012512 
012516 
012522 
012524 
012526 
012552 
012552 
012554 
012540 
012544 
012546 
012550 
012554 
012554 
012556 
012562 
012566 
012570 
012572 



052767 000100 
001454 



167704 



BGt«1SG ER6001 



BIT 4BITO6.0PTI0N 
BEQ 60t 



ER6C01 : : 

lEXlT THE ROUTINE IF EXTENDED 
lERROR REPORTING IS NOT REQUESTED. 



I ♦ 



t REPORT EXTENDED ERROR INFOMATION 



t - 



010446 
010546 
012746 
012746 
010600 
104414 
062706 

010146 
012746 
012746 
010600 
104415 
062706 

010246 
012746 
012746 
010600 
104415 
062706 



004417 

000005 



000010 



004270 
000002 



000006 



004520 

000G02 



000006 



PRINTX •EFS'Ml.RI 



PRINTB •EF7601.RS.R4 iPRINT THE MESSAGE WITH THE LINE NUMBFR. 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

{PRINT THE "EXPECTED" DATA MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

iPRINT THE "ACTUAL' DATA MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
AOO 



PRINTX 4EF5902.R2 



R4. (SP) 
R5.(SP) 
•EF7601, (SP) 
♦5. (SP) 
SP.RO 
CtPNTB 
♦10. SP 

Rl. (SP) 
•EF5901. lSP> 
•2. (SP) 
SP.RO 
CIPNTX 
f6.SP 

R2. (SP) 
#£F5902. (SP) 
•2. (SP> 
SP.RO 
C»PNT» 
t6.SP 



CLOBAL ERROR REPORTING ROUTINE 

^059 012576 
012576 

012576 104425 
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SEO 54 



601: 



ENOnSG 



L 10007: 



TRAP 



CtnsG 



^061 
2062 
2065 
2064 
2065 
206<s 
2067 
2060 
2069 
2070 
2071 
2072 
20 "^5 
2074 
2075 
2076 
2077 
2078 
20 7<) 

2oao 

2061 
2062 
2063 
2064 
2065 
2066 
2067 
2066 

2089 

2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 



2101 
2102 
2105 
2104 



012400 
012400 
012400 
012400 



012404 
012412 



012414 
012416 
012422 
012422 
012424 
012450 
012454 
012436 
012440 
012444 
012446 
012450 
012452 
012452 
012454 
012460 
012464 
012466 
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.S8TTL GLOBAL ERROR REPORTING ROUTINE 



SEO 



ER6401 



THIS IS AN ERROR REPORTING SUBROUTINE UHICH PRINTS ADDITIONAL ERROR 
INFOR»tATION ATrgR THE ERROR HESSAGE HEADER. PROVIDED EXTENDED ERROR 
REPORTING HAS BEEN ENABLED. 

THIS SUBROUTINE IS PASSED A GPR CONTAINING FLAGS UHICH INDICATE 
THE LINE(S) FOR UHICH THE ERROR COMOITION SHOULD BE REPORTED. 



INPUTS: 
OUTPUTS: 



Rl ADDRESS OF THE HESSAGE TO BE PRINTED BY THIS ROUTINE. 
R5 - CONTAINS THE ERROR FLAGS. (1 FLAG PER LINE). 

MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

INCLUDE THE LABEL "ER6401" AS THE HESSAGE POINTER 

PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL, 



THE OUTPUT FORMAT OF THIS MESSAGE IS; 
TEXT MESSAGE 



COMMENTS: 



UHCRE EACH "«NN" IS THE NUMBER OF A Llf«E UITH THE ERROR. 
SUBORDINATE ROUTINES USED: NONE. 



004567 171454 



BGNMSG ER6401 
SAVE 



JSR 



ER6401: : 
I SAVE THE CONTENTS OF THE GPRS. 
R5.PREG05 tCALL REGISTER SAVE SUBRT. 



052767 
001455 



005002 
012705 

010146 
012746 
012746 
010600 
104414 
062706 
000241 
006205 
105011 

010246 
012746 
012746 
010600 
104414 



000100 167576 



000020 



TexIT the test if EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

* lEXIT UITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
t DURING THE SOFTUARE QUESTIONS. 



BIT 
BEG 



4BIT06.0PTI0N 
601 



CLR R2 

MOV 4NUMLNS.R5 

PRINTB •EF0505.R1 



(CLEAR LINE NUMBER TO ZERO. 
I SET UP MAX LINE COUNT. 
•PRINT MESSAGE. 



004156 

000002 



000006 



004550 

000002 



2«i 



CLC 

ASR R5 
BCC 4t 
PRINTB •EF6401.R2 



I Clear carry. 

tSHlFT flag out INTO CARRY BIT. 
tSKIP ERROR REPORT IF CLEAR. 
I PRINT MESSAGE. 



MOV Rl.-(SP) 

MOV #EF0505.-(SP> 

MOV ♦2.-(SP) 

MOV SP.RO 

TRAP CtPNTB 

ADO 46. SP 



MOV R2.-(SP) 

MOV •EF6401. CSP) 

MOV •2.-ISP) 

MOV SP.RO 

TRAP CtPNTB 



CZOHVBO OHU II FUNC TST PART2 
GLOBAL EPPOR REPORTING ROUTINE 
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012470 

2105 012474 

2106 012476 

2107 012500 
2106 012502 

012502 
2109 012504 
012504 
012504 



062706 
005202 
020502 
001S62 

004736 



104425 



000006 



4$: INC R2 

CMP R5.R2 

BNE 21 
601: PASS 

ENOMSG 



JSR 



I INCREMENT LINE COUNT. 

I CHECK IF MAX LINE COUNT EXCEEDED. 

iLOOP IF NOT DONE. 

I RESTORE THE SAVED CONTENTS OF TmE GPRS. 
PC.BCSP)* I RE TURN TO PREG05 SUBRT 



LIOOIO: 



TRAP 



CfMSG 



I.ZUMVUO UHU- 11 FUNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 



2111 
2112 
211S 
2114 
2115 
2116 
2117 
2118 
211<» 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
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- ER7801 - 

SBTTL GLOBAL ERROR REPORTING ROUTINE 



E»{7801 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
MESSAGE MHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER. A LINE NUMBER 
IS INCLUDED AT THE END OF THE MESSAGE. THE MESSAGE IS PRINTED ONLY IF 
EXTENDED ERROR REPORTING IS REQUESTED. 



INPUTS: 



OUTPUTS: 



Rl - ADDRESS OF THE MESSAGE TO PRINT. 

R3 - NUMBER OF LINE ON WHICH ERROR OCCURRED. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



LOAD THE ADDRESS OF THE MESSAGE IN Rl. 
LOAD THE LINE NUMBER INTO R3. 

INCLUDE THE LABEL "ER7801" AS THE MESSPGE POINTER 
PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
SUBORDINATE ROUTINES USED: NONE. 



2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 



2143 
2144 



012506 
012506 



012506 
012514 



012516 
012516 
012520 
012522 
012526 
012532 
012534 
012536 

012542 
012542 
012542 



BGNMSG ER7801 



ER7801: 



I ♦ 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



032767 000100 
001412 



010346 
010146 

012746 004417 
012746 000003 
010600 
104414 

062706 000010 



167474 



i - 



BIT «6IT06. OPTION 
BEQ 2% 



tEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

iOURING THE SOFTWARE QUESTIONS. 



PRINTB «EF7801.R1.R3 tPRINT THE MESSAGE. 



2t: 



ENDMSG 



104423 



LlOOll: 



MOV R3.-(SP) 

MOV Rl.-CSP) 

MOV •EF7801. (SP) 

MOV •3.-(SP) 

MOV SP.RO 

TRAP CtPNTB 

ADD «10.SP 



TRAP C<HSG 



SZOHVBO DMU 11 FUNC TST PART2 
LOBAL EftRW REPORTING ROUTINE 



2146 
2147 
2146 
2149 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 

2167 
2166 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
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- ER9001 

SBTTL GLOBAL ERROR REPORTING ROUTINE 



SEO 



ER9001 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS AN UNEXPECTED 
CODE WHICH HAS BEEN FOUND IN THE OUT CSR. THIS CODE CAN BE A BMP 
CODE, A SELF -TEST CODE. OR A MODEM STATUS CODE. 

Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

R2 - SINGLE BYTE CODE WHICH HAS BEEN READ FROM THE DUT. 
R4 - LINE NUMBER ASSOCIATED WITH THE CODE. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

INCLUDE THE LABEL "ER9001" AS THE MESSAGE POINTER 
PARAMETER IN THE OIAG SUPER ERROP REPORT MACRO CALL. 



» INPUTS: 

♦ OUTPUTS: 

* CALLING SEQUENCE: 

♦ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR II^ORMATION. 

* S«JBORDINATE ROUTINES USED: NONE. 



012S44 
012544 



BGNMSG ER9001 



ER9001:: 



I^EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



2176 



2177 



2176 
2179 



012544 


032767 


t - 

OOOlOO 167436 


BIT 


WIT06>0PI ION 


jEXIT WITH TEST FAILURE MESSAGE IF 






012552 


001433 




BEO 


2t 


tNO EXTENDED ERROR REPORTING HAS BEEN REOUESTED 














lOURING THE SOFTWARE QUESTIONS, 






012554 






PRINTB 


•Er9001.Rl 


{REPORT TYPE OF CODE FOUND. 






012554 


010146 








MOV 


Rl. (SP) 




012556 


012746 


004455 






MOV 


•EF9001. 


CSP) 


012562 


012746 


000002 






MOV 


♦2. (SP) 




012566 


010600 








MOV 


SP.RO 




012570 


104414 








TRAP 


C»PNTB 




012572 


062706 


000006 






ADD 


•6.SP 




012576 






PRINTX 


•EF9002.R4 


(REPORT THE LINE NUMBER OF THE CODE. 






012576 


010446 








MOV 


R4.-(SP) 




012600 


012746 


004537 






MOV 


♦EF9002. 


-CSP) 


012604 


012746 


000002 






MOV 


♦2. -CSP) 




012610 


010600 








MOV 


SP.RO 




012612 


104415 








TRAP 


C»PNTX 




012614 


062706 


000006 






ADO 


•6.SP 




012620 






PRINTX 


«eF900S.R2 


;REPORT THE CODE WHICH WAS FOUND. 






012620 


010246 








MOV 


R2. CSP) 




012622 


012746 


004611 






MOV 


#EF9003. 


CSP^ 


012626 


012746 


000002 






MOV 


•2. CSP^ 




012632 


010600 








MOV 


SP.RO 




012634 


104415 








TRAP 


C»PNTX 




012636 


062706 


000006 






ADD 


«6.SP 




012642 




2»: 


ENOnSG 










012642 










L 100 12: 






012642 


104423 








TRAP 


C$MSG 





CZOHVBO OHO II FUNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 



2181 

2102 

2163 

21A4 

2185 

2186 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

2194 

2195 

2196 

2197 

2198 

2199 

2200 

2201 

2202 

2203 012644 
012644 

2204 
2205 
2206 
2207 

2208 012644 032767 

2209 0126S2 001462 
2210 

2211 

?212 0126S4 006203 
2<fl« 012656 042702 

2214 012662 
012662 010346 
012664 010146 
012666 012746 
012672 012746 
012676 010600 
012700 104414 
012702 062706 

2215 012706 
012706 010246 
012710 012746 
012714 012746 
012720 012746 
012724 010600 
012726 104415 
012730 062706 

2216 012734 005704 

2217 012736 100414 

2218 012740 
012740 010446 
012742 012746 
012746 012746 
012752 012746 
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SEO 'Si 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9002 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN Ti* 
TRANMSISSION AND RECEPTION TESTS. IT REPORTS THE TYPE OF ERROR UHIcf 
HAS OCCURRED WHEN INCORRECT DATA IS RECEIVED FROM ThC OUT ^"^gJc^^^CH 
ROUTINE ALSO REPORTS THE READ AND EXPECTED DATA VALUES 



INPUTS: 



OUTPUTS: 



Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

R2 - DATA BYTE READ FROM THE OUT. 

R3 - LINE NUMBER MULTIPLIED BY 2. 

R4 - EXPECTED DATA BYTE. BIT 15 SET IF 



"NONE' 



A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQCCNCE: INCLIOE THE LABEL "ER9002" AS THE MESSAGE POINTER 

PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL. 

COrtlENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR IITORMATION. 

SUBORDINATE ROUTINES USED: PRTLPR. 



BGNMSG ER9002 



ER9002: 



t ♦ 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 167336 



177400 



BIT 
BEQ 



ASR 
BIC 
PRINTS 



•6IT06.0PTI0N 
62t 



RS 

♦1 77400. R2 
•EF9006.R1.R3 



I EXIT WITH TEST FAILURE MESSAGE IF 

tNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

;OURING THE SOFTWARE QUESTIONS. 

J CALCULATE THE LINE NUMBER. 

J MASK OUT ALL BUT DATA IN READ CHAR. 

1 PRINT THE FIRST LINE OF THE MESSAGE. 



004721 
000003 



000010 



010647 
004640 

000003 



000010 



010623 
004640 
000003 



PRINTX ♦EF9004.4EM9010.R2 



i PRINT ACTUAL DATA. 



MOV 


R3.'(SP) 




MOV 


Rl. -CSP) 




MOV 


*eF9006. 


(SP) 


MOV 


^3.-CSP) 




MOV 


SP.RO 




TRAP 


CiPNTB 




ADD 


♦10. SP 




MOV 


R2.-(SP:) 




MOV 


♦eM9010. 


(SP) 


MOV 


^F9004. 


(SP) 


MOV 


03, (SP) 




MOV 


SP.RO 




TRAP 


CIPNTX 




ADO 


010. SP 





TST R4 , CHECK FOR ''NONE * COOE SET IN ^^.^^ ^ 

BHI ^ 2% iBRANCH TO PRINT "NONE * MESSAGE IF FLAG SET, 

PRINTX 0EF9004.0EM9009.R4 jPRINT EXPECTED DATA, 

MOV R4, (SP) 

MOV 0EM90C9. 

MOV 0EF9004. 

MOV 03. (SP> 



(SP^ 
vSP) 
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SEQ eo 



012756 
012760 
012762 

2219 012766 

2220 012770 
012770 
012774 
013000 
013004 
013006 
015010 

2221 013014 

2222 013020 
013020 
013020 



010600 
104415 
062706 
000412 

012746 
012746 
012746 
010600 
104415 
062706 
004767 



104423 



000010 



010623 
004670 
000002 



000006 
002266 



21: 



BR 

PRINT X 



MOV SP.RO 
TRAP CIPNTX 
ADO «10.SP 

601 lEXIT THIS ROUTINE. 

♦EF9005.0EM9009 iPRINT MESSAGE INDICATING NO EXPECTED DATA. 



60$: 
62$: 



JSR 

ENDMSG 



PC.PRTLPR 



I PRINT CONTENTS OF 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

THE LPR REGISTER. 



L10013: 



TRAP 



♦eM9009. 

^F9005. 

1^2. -CSP) 

SP.RO 

CIPNTX 

4^.SP 



CIMSG 



CSP) 
(SP) 



C20HVB0 OHU II FUNC TST PARTS 
GLOBAL ERROR REPORTING ROUTINE 



2224 
2225 
222t 
2227 
2226 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2236 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
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SEQ 



2247 
2246 
2249 
2250 



2251 
2252 
2253 
2254 
2255 
2256 
2257 



2258 
2259 
2260 
2261 
2262 



013022 
013022 
013022 
013026 
013032 
013034 
013034 
013040 
013044 
013050 
013052 
013054 
013060 
013062 
013066 
013070 
013072 
013074 
013076 
013076 
013102 
013104 
013110 
013114 
013116 
013120 
013124 
013126 
013130 
013132 
013134 
013134 
013134 



012700 
046700 
001040 

012746 
012746 
012746 
010600 
104414 
062706 
005002 
016703 
005004 
000241 
006003 
103C13 

016446 
010246 
012746 
012746 
010600 
104415 
062706 
012405 
005202 
005703 
0013S6 



104423 



000100 
167156 



010673 
004156 
000002 



000006 
167S24 



002614 

004745 

000003 



000010 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS ERROR SUMMARIES 
FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 
INDIVIDUAL RECEPTION ERRORS. PROVIDED EXTENDED ERROR REPORTING HAS 
BEEN REQUESTED BY THE OPERATOR. 



INPUTS: 



OUTPUTS: 



Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

ERCNT6 - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERSMRF • "REPORT ERROR SUMMARY FOR LINE" FLAGS. 

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9004" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
THE CONTENTS OF GPR'S R2. R3, R4. AND RS ARE DESTROYED. 

SUBORDINATE ROUTINES USED: NONE. 



BGNnSG ER9004 



MOV 

BIC 
BNE 
PRINTS 



«eiT06.RO 
OPriON.RO 
6t 

•EF0503.«eM9014 



2«: 



CLR 
MOV 
CLR 

ac 

ROR 
BCC 

PRINTX 



4t: 



6t: 



MOV 
INC 
TST 
8HE 

ENOHSG 



ER9004:: 

I TRY TO CLEAR THE 
lEXT'D ERROR REPORTING FLAG 
tEXIT IF FLAG NOT SET. 
I REPORT THE SECONDARY ERROR MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

t CLEAR THE LINE COUNTER. 
iGET THE ERROR SUWARY FLAGS. 
tCLEAR -LINE COUNTER TWES 2" OFFSET. 
I CLEAR THE CARRY FOR THE FOLLOUING ROTATE, 
i SHIFT ANOTHER ERROR SUWARY FLAG INTO CARRY. 
I SKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR 
•EF^OIO . R2 . ERCNTBC R4 > 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

I INCREMENT THE LINE OFFSET BY 2. 
tlNCREHT THE LINE COUNTER. 
tCNECK THE ERROR SUMNARt FLAGS. 
tlF nORE FLAGS SET. LOOP TO 00 OTHER LINES 



R2 

ERSMRF .R3 
R4 

R3 
4t 



•EM9014.-CSP) 
4eF0503.-(SP) 
02.-CSP) 
SP.RO 
CSPNTB 
•6.SP 



(R4)».R5 

R2 

RS 

2« 



ERCNTBCR4^. (SP 
R2.-fSP) 
•EF9010.-(SP? 
•3.-CSP) 
Sr.RO 
C#PNTX 
♦10. SP 



L 10014: 



TRAP 



C»MSG 



CZOHVBO DHU II FUNC rST PMRr2 
GLOBAL ERROR REPORTING ROUTINE 



2264 
2265 
2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
22^6 
2277 
2278 
2279 
2280 
2281 
2282 

2283 013136 
013136 

2284 

2285 013136 

2286 013142 

2287 013146 
2288 

2289 

2290 013150 
013150 
01? 152 
013154 
013160 
013164 
013166 
013170 

2291 

2292 013174 
013174 
013174 



MACRO ni200 15-nAH-84 09:28 
- ER9101 



PAGE 49 



SEQ t^ 



012700 
046700 
001012 



010146 
010246 
012746 
012746 
010600 
104414 
062706 



104423 



000100 
167042 



004721 
000003 



000010 



SBTIL GLOBAL ERROR REPORTING ROUTINE ER9101 



THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
IfSIL? 2 DIGIT DECIMAL ARGUMENT AFTER T^C ENO OT AN 

Rl - VALUE TO BE PRINTED AFTER MSG AS 2 DECIMAL DIGITS 
R2 - ADDRESS OF MESSAGE TO PRINT first. UlUlib. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

INCLUDE THE LABEL "ER9101" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



* 

* INPUTS: 
* 
* 

* OUTPUTS 

* CALLING SEQUENCE 
* 
* 

* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR WrCRMATION. 

* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9101 



ER9101: 



MOV 
BIC 
BNE 



•BIT06.ro 
OPTION.RO 
21 



jTRY TO CLEAR THE 

tEXT'D ERROR REPORTING FLAG 

lEXIT If HOT SET. 



PRINie 4EF9006.R2.R1 tREPORT THE STRING FOLLOUEO BY T»C NUMBER. 



2ti 



ENOMSG 



L10015: 



MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

AOO 



TRAP 



Rl. CSP) 
R2. CSP) 
•EF9006, 
♦3. (SP) 
SP.RO 
CSPNTB 
•10. SP 



C«MSG 



CSP) 



C/OMVBO UHU II fUNC TST PMRT2 
GLOBAL ERROP R£PORriNG ROUTINE 



2294 
2295 
2296 
2297 
2<:98 
2299 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 
2310 
2311 
2312 
2313 
2314 
2315 
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2316 

2317 
2318 
2319 
2320 
2321 
2322 



2323 
2324 
2325 
2326 
2327 
2328 
2329 
2330 
2331 
2332 
2333 
2334 
2335 
2336 
2337 
2338 
2339 
2340 
2341 
2342 



013176 
013176 
013176 
013176 

013202 
013206 
013212 

013214 
013214 
013216 
013222 
013226 
013230 
013232 
013236 
013242 
013246 
013250 
013252 
013256 
013260 



004567 170656 



012700 
046700 
001064 



010146 
012746 
012746 
010600 
104414 
062706 
012703 
012705 
012301 
012304 
004767 
020302 
103772 



000100 
166776 



004156 
000002 



000006 
002412 
011257 



000056 



013262 
013266 
013270 
013274 
013276 
013300 
013302 



020227 002606 
001036 

005762 000002 
001433 
012301 
011304 

012705 011307 



,SBTTL GLOBAL ERROR REPORTING ROUTINE 



- ER9301 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP COOES 
THAT ARE FOUND IN THE BMP CODE QUEUE. TOGETHER UTTH THE THE NUMBER OF 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 



INPUTS: Rl - THE ADDRESS Of THE FIRST MESSAGE TO BE REPORTED. 

R2 - THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 

OUTPUTS: THE TEST NUMBER FO'.LOWED BY THE BMP CODE ARE PRINTED AT 

OPERATOR CONSOLE. 



THE 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9301" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG StJPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9301 



SAVE 



MOV 
BIC 
BNE 



JSR 



«6IT06.R0 
OPTION.RO 
60$ 



PRINTS «6F0503.R1 



21: 



MOV 
MOV 
NOV 
MOV 

JSR 
CMP 

BLO 



«6r«>CQB.R3 

•EM9J02.R5 

CR3)».R1 

(R3)..ft4 

PC. 501 

R3.R2 

21 



ER9301:: 
tSAVE THE GPRS ON THE STACK. 
RS.PREG05 :CALL REGISTER SAVE SUBRT. 

{TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 

:RePORT uNExpecTEO en* cooes fqu^a 

MOV Rl.-(SP) 
MOV •EF050?. 
MOV 92. (SP) 
MOV SP.RO 
TRAP C»PNTB 
AOO ^6 SP 

jGET the start address of T« BMP CODE QUElC. 

I GET THE MESSAGE TO BE REPORTED. 

(GET THE NUMBER OF T»C TEST THAT WAS EXECUTING. 

iGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 

tCO REPORT nc BMP CODE. 

(CHECK IF ALL COOES HAVE BEEN REPORTED. 

I IF IT IS NOT THE LAST BMP CODE THEN LOOP. 



(SP) 



CHECK IF OVERFLOW HAS OCCURRED. 
THE CONDITIONS FOR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
LAST CELL IN THE QUEUE. AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
CELL. 



CMP R2.«eMPCQE-4 

BNE 601 

TST 2(R3) 

BEQ 60* 

MOV (RS)*.R1 

MOV (RS).R4 

MOV 4«M930S.R5 



iCHECK IF T»C POINTER IS AT THE LAST LOCATION. 

jEXIT IF NOT AT THE LAST cOCATION. 

(CHECK FOR A BMP CODE IN THE LAST CELL 

(EXIT IF NO OVERFLOW HAS OCCURED. CELL EMPTY. 

(GET THE TEST NUMBER OFF THE QUEUE. 

iCET THE BMP CODE OFF THE QUEUE. 

(SELECT THE MESSAGE TO BE REPORTED. 
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Ulc f *»o 






ftl P7AA 




















000004 




OAA7A7 


AAAAAO 




















015554 


Ol 044A 




Ol 555#i 


Ol Ol 4A 




01 5540 


Ol O^AA 




01 5540 


Ol P74A 


no<(A<(T 


01554A 


Ol P74A 




01 55S^ 


Ol o#^no 




01 55*^ 


1 A441 *\ 




01 XX*^ 




AAAA1 ^ 


P54A 01 


AAADA7 




2549 0155M 






015564 






2350 






2351 013366 






013366 






013366 


104423 





SEQ 



PRINTX «EF9302 



JSR 
BR 



PC. 50* 
601 



(REPORT OVERFLOW CONDITION. 

MOV 
MOV 
MOV 
TRAP 

iRE,>ORT THE LAST BMP CODE PLACEO^ON THE QUEUE. 
lEXIT. 



•Er9302,-CSP) 
#1. (SP) 
SP.RO 
CtPNTX 
♦4.SP 



501: PRINTX *SF9301 .R5.R1 .R4 



601: 



RTS 
PASS 



ENOnSG 



PC 



JSR 



I PRINT THE MESSAGE. 

MOV R4. (SP) 

NOV Rl. (SP) 

MOV R5.-(SP) 

MOV «Er930l. 

MOV #4. (SP) 

MOV SP.RO 

TRAP CtPNTX 

.HETURN. ^^^'^^ 
t RESTORE THE GPR CONTENTS. 

PC.8(SP">* jRETURN TO PRCG05 SU8R'. 



.10016: 



TRAP 



CSP) 



C«MSG 



IMD 

CZOMVBO OHU II FUNC TST PART2 MACRO ril200 15 MAR 84 09; 28 PAGE 51 SEQ 6'. 

GLOBAL SUBROUTINES SECTION 

2553 .SBTTL GLOBAL SUBROUTINES SECTION 

<>561 

2362 

2363 s ♦ ♦ 

2364 X THE GLOBAw SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

2365 ; THAT ARE USED IN MORE THAN ONE TEST. 

2366 \ ' - 



C/OHVBO OMU 11 TUNC Fsr PMH2 

CLoeAL sueAouriNC 



?56« 
2369 
2370 
2S7i 
2372 
2575 
2574 
2575 
25 '6 
2577 
257« 
2579 
2590 
25S1 
2S02 
2505 
2504 
2505 
2506 
2507 
2500 
2509 
2590 
2591 
2592 
2595 
2594 
2595 
2596 



HACRG H1200 
•LffLO 



iS-HM 04 09:20 PAGE S2 



SCO 66 



.S8TTL CLOSM. SUBROUTINE 



ALTFLO 



• - ALTER DEVICE REGISTER FIELDS ROUTINE 

• THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 

• REGISTER FOR THE SPECIFIED LINES. THIS HOUTINE CAN BE USED TO SET 

• OR aEAR BITS UITHIN SELECTED FIELDS OF SELECTED REGISTERS. 

• USE EXAMPLES; SET RX. BAUD. RATE FIELDS ON LINES 5 AND 6. 

• CLEAR TX.OHA BITS ON ALL LINES. 

• n^rS: Rl - ADDRESS OF THE REGISTERS TO ALTER. 

• R2 - BIT FIELDS SET TO DESIRED STATES. 

• R5 • BIT MAP OF LINES FOR UHICH TO ALTER REGISTER. 

• R4 - HASK OF BITS TS ALTER CI INDICATES CHANGE BIT). 

• CSRA • CONTAINS THE ADDRESS OF THE DEVICE CSR. 

• lESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 
• 

• OUTPUTS: DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 

• CSR INO.ADR.RCG FIELD • DESTROYED. 



* CALLING SEQUENCE: 



JSR 



PC.ALTFLD 



« COmENTS: THIS ROUTINE READS T^C SPECIFIED REGISTERS FOR ALL LINES 

* WITH Nlf«ERS LOWER THAN THE HIGHES SPECIFIED LINE. 

* THIS ROJTINE DOES NOT READ THE CSR. 

* SUBROUTINES CALLED: NONE. 



2597 
2590 
2599 
2400 
2401 
2402 
2405 
2404 
2405 
2406 
2407 
2400 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2410 
2419 
2420 
2421 
2422 
2425 



015570 
015570 



004567 170464 



ALTFLD:: SAVE 



I SAVE CONTENTS OF GPRS RO ThRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 



015574 
015576 
015400 
01S402 



010400 
005100 
040002 

016705 166650 



SET UP TO LOOP FOR EACH LINE: 

PREPARE THE WORD TO BE OREO INTO THE REGISTER CONTENTS. 

SET UP THE WORD TO WRITE INTO T« IND.AOR.REG FIELD OF THE CSR. 



NOV 

con 

BIC 
NOV 



R4.R0 

RO 

R0.R2 
IESTAT.R5 



(CALCULATE THE NEW CONTENTS OF T»C 

I REGISTER FIELDS WHICH ARE TO BE 

I ALTERRED Bt THIS ROUTINE. 

iSEI UP TO WRITE IND.AOR.REG FIELD TO 0. 



013406 
013410 
013412 
015414 
013420 
013422 
013424 
013426 
015450 
015452 
015434 



000241 
006005 
105006 

010577 166606 

011100 

040400 

050200 

010011 

005205 

005705 

001365 



LOOP ONCE FOR EACH LINE. ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. 

EXIT THE LOOP IF NO MORE LINES TO ALTER. OR IF WE HAVE ALTERED THE NAX 
ALLOWABLE NUNBER OF LINES CAS SPECIFIED BY NUr«.NS). 



21: 



4<: 



CLC 
ROR 

BCC 
HOV 
NOV 
BIC 
BIS 
HOV 
INC 
TST 

BNE 



R5 
41 

R5.SCSRA 

CRD.RO 

R4.R0 

R2.R0 

RO.CRl) 

R5 

R5 

2« 



{PREPARE FOP ROTATE. "TST R5" DOCS THIS BELOW. 

iGET r»C LINE SELECT BIT FOR THIS LINE. 

I SKIP SETUP IF LI»C IS NOT SELECTED. 

iSET OUT CSR IND.AOR.REG FIELD TO THIS LINE. 

iGCT THE PRESENT CONTENTS OF THE REG TO ALTER. 

iCLEAR T^C BIT FIELDS WE ARE TO ALTER. 

tOR IN THE NEW STATES OF THE FIELDS. 

iWRITE T»C NEW REGISTER CONTENTS TO THE RFC. 

iSET LINE NUMBER TO THE NEXT LINE. 

t CHECK FOR UNHANDLED LINES. CLEAR CARRi FLAG. 

iLOOP IF SELECTED LINE(S) IS NOT HANDLED. 



tf8lftf^alWaHIft^ ""^'^ 'vy^nj^ « »«« m oq.-^e pace 52 1 

OlSsJ aA«7<« "^'^ iRESTOfiE GPRS. 

.4^6 Ola's SSS? PTS PC '^''^ tfeSIS^io CALLING ROUTN^"'^*^ ^'^^^ 



SCO «7 
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3E0 hH 



2426 
2429 
2450 
2451 
24S2 
2453 
2454 
2455 
2456 
2457 
2450 
2459 
2440 
2441 
2442 
2445 
2444 
2445 
2446 
2447 
2446 
2449 
2450 
2451 
2452 
2455 

2454 
2455 
2456 
2457 
2450 
2459 
2460 
2461 
2462 
2465 
2464 
2465 
2466 
2467 
2466 
2469 
2470 
2471 
2472 
2475 
2474 
?475 
2476 
2477 
2476 
2479 
2460 
2461 
2462 
2485 



.Sa^TL GLOBAL SUBROUTINE 



ASLNTL 



015442 
015442 
015446 
015454 



015456 
015460 
015464 
015466 
015470 
015474 
015476 



015500 
015504 
015510 
015512 
015514 
013520 



015522 
0155P6 
015552 
015554 
015556 
015540 



* - SETUP ASSOCIATED LINE NUMBER TABLES ROUTINE • 

* THIS ROUTINE SETS UP THE TWO TABLES UHICH ARE CONTAIN INFORHATION 

* ABOUT THE TX/RX LINE UHICH IS ASSOCIATED UITH A PARTICULAR RX/TX 

* LINE. ONE TABLE IS A TABLE Of WORDS UHICH CONTAINS WORD OrrSET 

* VALUES AND THE OTHER TABLE IS A TABLE OF BYTES UHICH CONTAINS 

* LINE NUMBER VALUES. 



* INPUTS: 



LOPBCK • STORAGE TOR THE TYPE OF LOQPBACK ON THE DUT. 

NUMLNS - EQUATED TO THE NUMBER OF LINES ON THE DUT. 

STGTRB • LABEL AT BASE OF STAGGERED LINE ASSOCIATION TBL. 

TXRLNB • LABEL AT BASE OF BYTE TX/RX LINE NUMBER TABLE. 

TXRXLB - LABEL AT BASE OF WORD TX/RX LINE NUMBER TABLE. 

TXRXLE - LABEL AT END OF WORD TX/RX LINE NUMBER TABLE. 



* OUTPUTS; TXRXL. TXRLN - 

* CALLING SEQUENCE: JSR 

* COMMENTS: 

* SUBORDINATE ROUTINES CALLED 



TABLES INITIALIZED FOR SELECTED LOOPBACK. 
PC. ASLNTL 

: NONE. 



004567 
126727 
001411 



005005 
010565 
005205 
005205 
020527 
002771 
000411 



012701 
012702 
112122 
105022 
020227 
002775 



012701 
012702 
012105 
006205 
110522 
020127 



170412 
166550 



005750 
000040 



004050 
005750 



004010 



005750 
004010 



004010 



000002 



ASLNTL:: SAVE 

CMPB 
BEQ 



tSAVE CONTENTS OF GPRS RO THRU RS. 
JSR R5.PftEG05 tCALL REGISTER SAVE SUBRT. 

LOPBCK. «2 I TEST FOR STAGGERED LOOPBACK. 

4f iGO SET UP STAGGERED TABLE IF STAGGERED LPBCK. 



» SET 
I- 

2t: 



I ♦ 

I SET 
t - 
41: 

6t: 



!♦ 

I SET 
I • 
61: 

10*: 



UP THE WORD TABLE FOR NON- STAGGERED LOOPBACK. 



CLR RS 

MOV R5.TXRXLB(R5) 

INC RS 

INC R5 

CMP R5.«2*NUMLNS 

BLT 21 

BR Bt 



I CLEAR THE LINE COUNTER 
tSET UP A UORO OF THE TABLE. 

tSET LINE COUNTER TO NEXT LINE OFFSET. 
{TEST FOR ALL LINES DONE. 
{LOOP UNTIL ALL LINES DONE. 
tGO SET UP THE BYTE TABLE. 



UP THE UORO TABLE FOR STAGGERED LOOPBACK. 

MOV #STCTRB.R1 tSET UP THE SOURCE POINTER. 

MOV •TXRXLB.R2 tSET UP THE DESTINATION POINTER. 

MOVB (R1)*,(R2)* iMOVE A BYTE INTO THE TABLE. 

CLRB (R2)* I CLEAR THE UPPER BYTE OF UORO TABLE ENTRi . 

CMP R2.«TXRXLE (COMPARE POINTER UITM END ADR OF TABLE. 

BLT 6« tLOOP IF NOT AT END YET. 

UP THE BYTE TABLE BASED ON THE UORO ASSOCIATION TABLE. 

MOV MXRXLB.Rl i SET UP THE SOURCE POINTER. 

MOV •TXRLNB.R2 iSET UP THE DESTINATION POINTER. 

MOV (R1)*.R5 iCET THE UORD OFFSET VALUE FROM WORD TABLE. 

ASR R5 iDIVlDE BY 2 TO GET LINE NUMBER VALUE. 

MOVB R5.(R2)» iLOAD THE BYTE LINE NUMBER INTO TABLE. 

CMP Rl,»TXRXLt iCOMPARE SOURCE POINTER UITH ADR OF TABlf tND. 
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GLOBAL SLeROuTlNE ASLNTL 

2484 015544 002772 BLT 101 .LOOP IF NOT AT END Of TABLE VET. 

004756 ^SR ^JnJSi"'"'' .RET.JRNT0PREGO5SO8PT. 

015550 000207 «TS PC 
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2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2496 
2499 
2500 
2501 
2502 
2505 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 



MACRO M1200 
- CALMSL - 
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SEQ 70 



.SBTTL GLOBAL SUBROUTINE 



CALMSL 



- CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE 
THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 
ROUTINE, THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 
WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH TAKES I MS TO EXECUTE IN 
THE MSLOOP ROUTINE. THIS RO«JTINE CALIBRATES THE COUNT Br USING THE 
LINE TIME CLOCK (LTC). SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 
THE DELAY COUNT MUST BE USED. 



INPUTS: 



OUTPUTS! 



MSLCNT - DEFAULT I MS DELAY LOOP COUNT VALUE. OR 

VALUE FROM PREVIOUS CALIBRATION. 
MSTICK • NUMBER OF MS PER LTC CLOCK TICK, 

TIMERl - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 
CLKHRZ • NUMBER OF LTC CLICKS PER SECOND (SO OR 60). 



CARRY ■ 
HSLCNT 



SET IF LTC IS AVAILABLE. AND NEW CALIBRATION PERFORMED. 
- NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE. OR 
UNCHANGED V NO LTC IS AVAILABLE. 



JSR 



PC, CALMSL 



CALLING SEQUENCE: 
COftCNTS: 

SUBORDINATE ROUTINES CALLED: UNSDIV.OOPS. 



2518 
2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 
2527 
2528 
2529 
2530 
2531 
2532 
2533 
2534 
2535 
2536 
2537 
2538 
2539 
2540 
2541 
2542 
2543 
2544 



013552 
013552 
013556 



004567 
0OS067 



170S02 
000210 



62* 



JSR 



013562 012705 000001 



013566 005000 

013570 012767 000001 

013576 005767 166S12 

013602 001410 

013604 005200 

013606 001373 

013610 005305 

013612 003371 



013614 005067 166472 
013620 000241 
013622 000461 



013624 012704 002514 



CALHSL:: SAVE 
CLR 

!*SVNC»«0NIZE WITH THE LTC. 
t - 
2«: 



tSAVE CONTENTS OF GPRS RO Tr«U RS. 
RS.PREGOS tCALL REGISTER SAVE SUBRT. 

(CLEAR THE 2ND TIME FLAG. 



166S16 



4»; 



MOV 



CLR 
NOV 
TST 
BED 
INC 
BNE 
DEC 
BGT 



♦1.R5 



I SET OUTER LOOP COUiTER TO 1 LOOP. 
iINCf^ASE THE VALUE LOADED INTO THIS COUNTER IF T>C <•* 
iFOLLOUINC LOOP FAILS ON FUTURE. FASTER PROCESSORS. <•* 
RO iCLEAft T»€ UAIT FOR CLOCK INT COMTER. 

#1. TIMERl iSET UP COUNT OF I TO SYNCH WITH LTC. 

TIMERl tCHECK FOR COUNTER HAVING GONE TO ZERO. 

«• tJUNP OUT OF LOOP IF LTC HAS INTERRUPTED. 

RO iCOUNT THIS ITERATION OF T»€ DMER LOOP. 

4» iLOOP 1^ COUNTER HAS NOT TURfCO OVER. 

RS iDECREfCNT THE INNER LOOP COUNTER. 

41 (LOOP IF OUTER LOOP COUNT NOT UP. 



r IF UE GOT NO LTC INTERRUPT. INDICATE THAT THERE IS NO LTC AVAILABLE, 
t LTC NUST BE FLAKEY. OR NOT REALLY AN LTC AT ALL. 



CLR 
CLC 



aKHRZ 
60$ 



laEAR LTC FREQUENCY WORD TO DOICATE NO LTC. 

t INDICATE FAILURE FOR RETURN. 

iSYPASS THE FOLLOWING CALIBRATION PROCEOL<*£S. 



! WE ARE NOW SYNCHRONIZED WITH THE LTC. 
J SET UP FOR THE CALIBRATION LOOP. 

i - 
61: 



MOV 



•TIMERl. R4 



IMILL TEST TIMERl IN THE LOOP BEcOW, 



CZOMVBO OHU 11 FUNC TST PARTS MACRO M1200 
GLOBAL SUBROUTINE CALMSL 



IS -MAR 84 09:26 



PAGE 54 1 



2545 
2546 
2547 
2546 
2549 
2550 
2551 
2552 
2553 
2554 
2555 
2556 
2557 
2556 
2559 
2560 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2566 
2569 
2570 
2571 
2572 
2573 
2574 
2575 
2576 
2577 
2576 
2579 
2560 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2566 
2569 
2590 
2591 
2592 
2593 

2594 
2595 
2596 
2597 



013630 
013632 
01S6S4 
013636 

013642 
013646 
013650 
013654 
013656 
013660 
013662 
013664 
013666 
013670 
013672 
013674 



013700 
013702 
013706 
013710 
013712 
013714 
013716 
013720 
013722 
013724 
013726 



013730 
013734 
013736 
013740 
013744 
013746 
013752 
013756 
013762 
013764 

013766 
013766 
013770 

013772 
013774 



005001 






CLR 


Rl 


1 CLEAR THE OUTER LOOP COUNTER. 


005002 






CLR 


R2 


1 INDICATE TO CHECK ALL BITS Of TIMERl, 


005003 






CLR 


R5 


1 INDICATE TO CHECK FOR TIMERl CLEAR, 


012714 


000001 




MOV 


♦1,(R4> 


iLOAD TIMERl WITH COUNT Of I. 


016705 


166460 


81; 


MOV 


MSLCNT,R5 


iLOAD MS LOOP COUNT. 


011400 




101 : 


MOV 


(R4),R0 


iGET THE TIMERl VALUE. 


010067 


000120 




MOV 


RO • 64 $ 


iSAVE WORD (LIKE IN THE REAL LOOP). 


040200 






BIC 


R2.R0 


f LEAVE ALL THE BITS. 


020003 






CMP 


R0,R3 


I COMPARE AGAINST ZERO. 


000261 






SEC 




iSET CARRY IN CASE OF SUCCESS. 


001406 






BEQ 


121 


lEXIT LOOP IF TIMERl HAS CLEARED. 


005305 






DEC 


R5 


1 COUNT DOI#l THE INSIDE MS LOOP COUNT. 


001567 






oNt 


1 At 


.1 HUD Tr MC MOT 10 


005301 






DEC 


Rl 


1 DECREMENT THE MS TIME COUNT. 


001363 






BNE 


61 


iKEEP LOOPING. 


004767 


001160 




JSR 


PC. OOPS 


tUE OVERFLOUEO. SOMETHING IS WRONG. ABORT. 



005401 
016702 
010203 
160502 
010204 
005005 
005301 
100403 
060304 
005505 
000775 



016701 
010403 
010502 
004767 
103402 
004767 
010167 
005167 
001277 
000261 



004736 
000207 

000000 
000000 



166420 



166370 



00S336 

001106 
166350 
000010 



t UE HAVE NOW HAVE LOOP COUNT INFORMATION FQR ONE CLOCK TICK. 

{ WE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN Rl. EACH IS MSLCNT INNER LOOPS, 

t HE HAVE THE PORTION OF THE LAST OUTER LOOP HOT EXECUTED. IN R5. 

I NOW WE CALCULATE THE TOTAL NlMER OF IHMER LOOPS EXECUTED. 

121: NEG Rl iGET NUMBER OF OUTER LOOPS. 

NOV MSLCNT. R2 {GET THE NU»«ER OF DMER LOOPS PER OUTER LOCP. 

MOV R2.R3 iCOPT NUMBER OF LOOPS FOR MULTIPLY . 

SUB R5.R2 iCALC • OF DMER LOOPS DONE IN LAST OUTER LOOP 

MOV R2.R4 I AND ADD TO ACCUTMLATOR LSUORO. 

CLR R5 t CLEAR ACCUMULATOR MSUORD. 

DEC Rl iC^CCK Rl FOR 0 CONDITION 

BMI 161 I SKIP MULTIPLICATION IF ZERO 

ADD R3.R4 {MULTIPLY NUMBER OF INNER 

ADC RS t LOOPS PER OUTER LOOP BY 

BR 14« {NUMBER OF OUTER LOOPS PERFQRtCD. 



141: 



{ • 
{ 
( - 
161 



DIVIDE T»C TOTAL NUMBER OF INNER LOOPS BY T»C NUMBER OF MS PER LTC TICK. 



IBS: 



60»: 



62*: 
64»i 



MOV 
MOV 
MOV 
JSR 
6CS 
JSR 
NOV 
COM 
BNE 
SEC 

PASS 

RTS 

.WORD 
.WORD 



MSTICK.Rl {• OF MS PER LTC TICK IS DIVISOR. 

R4.RS {LSUORO OF LOOP COUNT IS LSUORO OF DIVIDEW. 

RS.R2 {MSUORD OF LOOP COUNT IS MSUORO OF OIVIDEW. 

PC.UNSOIV {DIVIDE NUMBER OF LOOPS BY MS PER LTC TICK. 

16 » {BYPASS OOPS IF UE-RE OK. 

PC. OOPS (aOCK ROUTINES ARE NOT LONG ENOUGH. OR BUG. 

Rl. MSLCNT iSET NEU VALUE FOR MS LOOP COUNT. 

62t {SET THE 2N0 ITERATION FLAGS IF 1ST ITERATION. 

2t {BRANCH IF ONLY ONE ITERATION DONE. 

{SET THE SUCCESS FLAG FOR EXIT. 

{RESTORE GPRS. 

JSR PC.B(SP)* (RETURN TO PREGOS SUBR^ 

{ CARRY - SUCCESS FLAG. SET IF SUCCESS. 

{2N0 CALIBRATION ITERATION FLAGS. 
{DUMMY WORD FOR STORAGE OF THE READ WORD. 



PC 

0 
0 
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2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
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CHKBMP 



- CHECK IF CHARACTER IS A BMP CODE 
THIS SUBROUTINE IS USED TO CHECK FOR BMP COOES. 

IF A BMP CODE IS DETECTED. IT UILL BE SAVED ON THE QUEUE TO BE REPORTED 
LATER. THE CARRY IS USED AS A FLAG TO INDICATE A CODE HAS BEEN FOUND. 

R2 - CONTAINS THE DATA TO BE CHECKED. 



* 
* 

* INPUTS: 
* 

* OUTPUTS: 
* 
* 
* 

* CALLING SEQUENCE: 

* COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED: SAVBMP 



Rl - CONTIANS THE MESSAGE TO BE REPORTED. 
ERRBLK - CONTAINS THE ERROR REPORTING ROUTINE. 
CARRY BIT IS USED TO INDICATE A BMP CODE FOUND. CARRY SET. 



JSR 



PC, CHKBMP 



2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 



2630 
2631 
2632 



013776 
013776 
014002 
014006 
014010 
014012 
014016 
014022 
014030 
014032 
014034 
014036 
014036 
014042 



004567 
012700 
040200 
001011 
004767 
012701 
012767 
000261 
000401 
000241 

010166 
004736 



170056 
170301 



002462 
006401 
012020 



000004 



170026 



014044 000207 



CHKBMP:: SAVE 

MOV 
BIC 
BNE 
JSR 
MOV 

nov 

SEC 
BR 

21: CLC 
60t: PASS 



RTS 



JSR 
•170S01.ro 
R2.R0 
2< 

PC. SAVBMP 

•EMSSOS.Rl 

•ER160S.ERRBLK 



601 
Rl 



PC 



MOV 
JSR 



(SAVE CONTENTS OF GPRS RO T»«U RS. 

R5.PRCG0S (CALL REGISTER SAVE SUBRT. 

tSET UP THE FLAGS OF A BMP CODE. 

tTRY TO CLEM THE BMP CODE FLAGS. 

t IF NOT A BMP CODE. EXIT UITH FAILURE. 

(SAVE THE BMP CODE ON THE QUEUE. 

I PASS THE MESSAGE TO BE REPORTED. 

(SELECT T»€ CORRECT ERROR REPORTING ROUTINE. 

(PASS FLAG TO INDICATE SUCCESS. BMP CODE FOUND. 

(EXIT. 

(PASS FLAG TO INDICATE FAILURE. 
(RESTORE GPRS. EXCEPT 

RI.RISLOT(SP) (POT Rl IN STACK SLOT. 

PC.aCSP)* (RETURN TO PREG05 SUBRT. 

iRl - CONTAINS THE ADDRESS OF ERROR MESSAGE. 
(CARRY BIT • SET INDICATES SUCCESS. 
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26 S4 
2635 
2656 
2637 
2658 
2659 
2640 
2641 
264;? 
2645 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
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SEQ T 



2661 
2662 
2663 
2664 
2665 
2666 
2667 
2666 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 
2685 
2686 
2687 
2688 
2689 



014046 

014046 004567 170006 

014052 010204 

014054 005204 

014056 006304 

014060 006S04 

014062 160104 



014064 012701 000005 

014070 010203 

014072 005002 

014074 004767 003202 

014100 010502 

014102 010305 

014104 160103 

014106 060105 

014110 062705 000002 



014114 020504 

014116 002402 

014120 020304 

014122 002417 



SBTTL GLOBAL SUBROUTINE 



CKRXTM 



' CHECK RX-INT DELAY TIME 
THIS SUBROUTINE IS USED IN THE RXTIMER TEST AND IT CHECKS THAT THE 
RX-INT UAS DELAYED BY */- 20« OF THE VALUE SET IN THE RXTIMER REG. 
IF THE ACTUAL DELAY TIME IS NOT WITHIN THIS MARGIN THEN AN ERROR 
IS REPORTED. 



Rl 
R2 



REMAINING NUMBER OF MILL I SECS OF THE TIME OUT VALiJE 
THE TIME-OUT VALUE BEING 4*(RXTIMER VALL€ » 1). 
RXTIMER VALUE. 



* 

* INPUTS: 
* 
* 

* 

* 

* OUTPUTS 
* 

t CALLING SEQUENCE: 

* COMMENTS: THIS ROUTINE REPORTS ONE ERROR WITH THE NUMBER IN ERRNBR 

* SUBORDINATE ROUTINES USED: ER5901.UNS0IV. 



ERRNBR 
ERRBLK 
EXOERR 

ERRBLK 
EXOERR 



SET TO ERROR NUMBcR OF FIRST ERROR IN THIS ROUTINE. 
SET UP BY THIS ROUTINE. 
"EXIT ON ERROR " FLAG. 

MAY BE ALTERED. 

"EXIT ON ERROR" FLAG SET IF AN ERROR DETECTED AND 
EXTENDED ERROR REPORTING NOT REQUESTED. 



JSR 



PC. CKRXTM 



CKRXTM:: SAVE 

MOV R2.R4 

INC R4 

ASL R4 

ASL R4 

SUB R1.R4 



JSR 



t 

t 



CALCULATE 20* OF THE RXTIMER 



MOV 
MOV 
CLR 
JSR 
MOV 
MOV 
SUB 

ADO 
ADO 



#S.R1 
R2.RS 
R2 

PC.UNSOIV 
RS.R2 
RS.R5 
Rl.RS 

R1.R5 
«2.RS 



R5.PREG05 tCALL REGISTER SAVE SUBRT. 

iCOPY THE RXTIMER VALUE. 
{CALCULATE TKC TIME-OUT VALUE, 
t AS 4*(RXTIMER VALUE*1) 

{CALCULATE T»C NUI«ER OF MS THE RX-INT UAS DELAYED. 
VALUE. 

tPASS THE DIVISOR TO THE SU8R. 

iLOAO THE RXTIMER VALUE INTO THE LSU OF THE DIVIDEND. 
I CLEAR THE nSU OF THE 0lVl0E»O. 
lOIVlOE THE RXTI»«R VALUE BY 5. 
iPESTQRE T»C RXTIMER VALUE. 
iCOPY THE RXTIMER VALUE. 

|REOU(^ IT BY 20« TO QBTAIN THE LOLIMIT OF THE 
if^RMISSIBLE TIME DELAY. 

{INCREASE THE RXTIMER VALUE Bv 20* AND ADO A 
{FURTHER 2 MS TO OBTAIN THE MILIMIT OF THE 
(PERMISSIBLE TIME DELAY. 



{ CHECK IF THE RX-INT OCCUREO UITMIN THE CALCULATED PERMISSIBLE LIMITS. 

** CMP R5.R4 (COMPARE MILIM WITH ACTUAL RX-INT 0ELA> . 

BLT 21 (REPORT THE ERROR IF THE DELAY UAS TOO LONG. 

CMP R3.R4 (COMPARE LOLIM WITH ACTUAL RX-INT DELA>. 

BLT 60 t (AVOID ERROR IF DELAY MAS UITHIN THE LIMIT^. 

I REPORT THE ERROR. INCORRECT DELAY ON RX INT. 



CZDHVBO DMU 11 FUNC TST PART2 
GLOBAL SUBROUTINE 



2690 014124 

2691 014126 

2692 014150 
2693 

2694 

2695 014134 

2696 014142 
014142 

2697 

2696 014144 

2699 014152 

2700 014154 
014162 
014162 

2702 014164 



2701 



010201 
010402 
012703 



007003 



104460 

032767 
001003 
012767 

004^56 
000207 
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012767 012170 167714 



000100 166036 
000001 166070 



60t: 



MOV 
MOV 
MOV 



MOV 
ERROR 



BIT 
B^4E 

MOV 
PASS 

RTS 



R2.R1 
R4.R2 

«EM5602.R3 



•ER5901.ERRBLK 



4BIT06. OPTION 
60 « 

n.EXOERR 



PC 



JSR 



iPASS THE EXPECTED VALUE OF THE RX INT OEIAf. 
•PASS THE ACTUAL VALUE OF THE RX INT DELAf, 
I PASS THE MESSAGE. 

I "RX TIMER BAD. INCORRECT MILL I SEC DELAY ON 
I RX INT". 

I SET UP THE ERROR REPORTING ROUTINE. 



TRAP 



C tERROR 



iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
{AVOID SETTING THE FLAG IF IT HAS. 
jSET THE "EXIT ON ERROR" FLAG. 



SEQ '4 



PC,8( SP)» 

t RE TURN FROM SUBROUTINE. 



:RETURN TO PREG05 SUBRT. 



t 



CZOHVBO OMU II TUNC TST PART2 
GLOBAL bL«ROUTINE 



2704 
2705 
2/06 
2707 
2708 
2709 
2710 
27H 
2712 
2713 
2714 
2715 
2716 
2717 
2718 
2719 
2720 
2721 
2722 
2725 
2V24 
2725 
2726 
2727 
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SEQ /' 



2728 
2729 
2730 
2731 
2732 
2733 
2734 

2735 



014166 
014166 
014172 
014176 
014200 
014204 
014206 
014210 
014212 
014212 
014214 



004567 167666 
005067 166102 
011011 

005767 166074 
000261 
001401 
000241 

004736 

000207 



SBTTL GLOBAL SUBROUTINE 



CKTRAP 



* CHECK TRAP HOUTINt - 

* THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME OUT TRAP (004 TRAP) 

* WHICH IS CAUSED BY AN ACCESS TO A NON EXISTENT MEMORY OR I/O LOCATION. 

* ir THE TRAP DOES NOT OCCUR. THIS ROUTINE RETURNS A SUCCESS INDICATION. 
* 

* INPUTS: RO SOURCE ADDRESS TOR MOVE. 

* Rl DESTINATION ADDRESS TOR MOVE. 

* (RO) - SOURCE FOR THE MOVE. 
* 

* OUTPUTS: (Rl) - WRITTEN TO THE CONTENTS OF (RO). 

* CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 

* TP4FLG - NONZERO IF TRAP OCCURRED. CLEARED OTHERWISE. 



* CALLING SEQUENCE: 



JSR 



PC. CKTRAP 



* COMMENTS: IF THIS SUBROUTINE CAUSES A TRAP. EITHER THE ADDRESS WHICH 

* IS LABELED AORPTR WILL BE THE TRAP PC ADDRESS ON THE STACK. 

* SUBORDINATE ROUTINES CALLED: NONE. 



CKTRAP:: SAVE 

aR 

MOV 
AOftPTR:: TST 
SEC 
BEQ 
CLC 

60$: PASS 
RTS 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PRCG05 tCALL REGISTER SAVE SuBRT. 

TP4FLC t CLEAR THE 004 TRAP FLAGS. 

(RO).(Rl) iPERFORN T»C HOVE IN QUESTION. 

TP4FLG lOCCK FOR OCCURENCE OF TRAP. 

I INDICATE SUCCESS. 
60» tEXiT WITH SUCCESS IF TRAP DID NOT OCCUR. 

(INDICATE FAILURE. 

(RESTORE GPRS. 

JSR PC.MSP)* sRETURN TO PREG05 SUBRT. 

PC 



CZOHVBO DHU II TUNC TST PARI 2 
GLOBAc SUBROUTINE 
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SCO /6 



2737 




2736 




2739 




2740 




2741 




2742 




2743 




2744 




2745 




2746 




2747 




2748 




2749 




2750 




2751 




2752 




2753 




2754 




2755 




2756 




2757 




2758 




2759 




2760 




2761 




2762 




2763 




2764 




2765 


014216 




014216 


2766 




2767 




2768 




2769 




2770 


014222 


2771 


014226 


2772 




2773 




2774 




2775 


014230 


2776 




2777 


014234 


2778 


014234 




014234 


2779 




2780 


014236 



.SBTTL GLOBAL SUBROUTINE 



CLNRST 



- CLEAN RESET OF THE DEVICE UNDER TEST - 
THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 
THE DUT'S SELF-TEST IS SKIPPED. AND THE FIFO IS PURGED OF ANT ERROR 
COOES. CTC. 

IF THE RESET DOES NOT SUCCESFUl^Y COMPLETE. THEN THE CARRr BIT IS 
PASSED BACK TO THE CALLING ROUTTNE (CLEAR). * 



* 
* 
* 

* 

t INPUTS: 
* 
* 
* 

* OUTPUTS: 

* 
* 

* 

* CALLING SEQUENCE: 

* COMMENTS: THIS S*JBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 

* THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

I SUBORDINATE ROUTINES CALLED: OELAY.HSLGCT.PUFIFO.RESETT. 



CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA • CONTAINS ADDRESS OF OUT DMA BUFFER COUNT REGISTER. 
ERRNBR - ERROR NUMBER FOR POSSIBLE ERROR REPORT. 
ERRTBL- ERRTYP.ERNBR.ANO ERRHSG SET UP CORRECTLY. 

THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 
CARRY • CLEAR INDICATES THE TEST IS TO BE ABORTED. 
ERRBLK • VALUE MAY BE DESTROYED. 
lESTAT • TX AND RX INTERRUPT FLAGS ARE CLEARED. 
TX A.NO RX INTERRUPT ENABLE BITS IN THE OUT'S CSR ARE CLEARED. 



JSR 



PC. CLNRST 



CLNRST:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS.PREGOS iCALL REGISTER SAVE SUBRT. 



i ♦ 

I RESET 
t THIS 
I - 



THE DUT. 

ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNBR THRU ERRNBR*2. 



JSR 

see 



PC .RESET T 
601 



{RESET THE OUT TO A KNOWN STATE. 

(EXIT ROUTINE WITH ABORT TEST INDICATOR. 



{ PURGE 

I - 

60t: 



THE FIFO OF ERROR CODES. SAVE ANY BMP COOES FOUND. 
JSR PC.PUFIFO tPURGE THE FIFO. 



PASS 
RTS 



PC 



lEXIT THE TEST USING RESETT OR POFIFQ STATUS. 
{RESTORE GPRS. PASS THE FOLLOWING INTACT: 
JSR PC.»(SP)» jRETURN TO PREGOS SOBR'. 

tCARRY BIT: IF CLEAR. THEN ABORT THE TEST. 



IC TST PART2 MAI 



2782 
2783 
2784 
2785 
2786 
2787 
2788 
27d9 
2790 
2791 
2792 
2793 
2794 
2795 
2796 
2797 
2798 

2799 
2800 
2801 
2802 
2803 

2804 



014240 

014240 004567 167614 

014244 012701 000020 

014250 005020 

014252 005301 

014254 001375 
014256 

014256 004736 

014260 000207 
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» » *4i4i*«4i 4* A* ****************************** A*** 4 
* 
* 
* 

* INPUTS: 

* OUTPUTS 

* CALLING SEQUENCE: JSR PC,CLR16U 

* COMMENTS: 

* SUBORDINATE ROUTINES CALLED: NONE. 



seo ff 



CLEAR SIXTEEN WORDS ROUTINE 
THIS SUBROUTINF CLEARS 16 WORDS STARTING WITH ^he SPECIFIED WORD 

RO - ADDRESS OF THE FIRST WORD TO CLEAR. 

(RO) TO (R0»15) - 16 WORDS OF MEMORY ARE CLEARED TO 0. 



CLR16W:: SAVE 
MOV 

21: CLR 
DEC 
BNE 
60>: PASS 

RTS 



•16. .Rl 

(RO* 
Rl 
2$ 



PC 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT 

(SET THE LOOP C0U4TER ^0 16. 
I CLEAR A WORD OF MEMORY, 
t COUNT THIS LOOP. 
tLOOP IF NOT 16 WORD CLEARED. 
iRESTORE GPRS. 

JSR PC.aCSP}* :RFTURN TO PREG05 SUBRT. 



N6 



CZOHVBO OMU 11 fUNC TST PART2 
GLOBAL SUBROUTINE 



2606 
2807 
2608 
2609 
2810 
2611 
2812 
2813 
2614 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2822 
2823 
2824 

2825 
2826 
2827 
2828 
2829 
2830 
2831 
2832 

2833 
2834 
2835 
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SEQ 78 



014262 
014262 
014266 
014270 
014274 
014276 
014302 
014306 
014310 
014314 
014314 
014316 



004567 
010401 
012702 
005003 
012704 
004767 
103002 
004767 

004736 
000207 



167572 
177777 

014320 
000536 

000544 



.SBTTL GLOBAL SUBROUTINE 



DELAY 



- DELAY SUBROUTINE - 
THIS SUBMOUTINF IS USED TO DELAY A VARIABLE NUMBER OF MILL I -SECONDS. 



R4 - CONTAINS THE NUMBER OF MS TO DELAY, 
MSLCNT . 



NONE. 



* 
* 
* 

* INPUTS: 
* 

t OUTPUTS: 
* 

* CALLING SEQUFNCE: 
* 

* COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCURING. CONTROL -CS WILL 

* NOT BE HONORED FOR THE DURATION OF THE DELAY. 

* SUBORDINATE ROUTINES CALLED: NONE. 



JSR 



PC. DELAY 



DELAY:: SAVE 



MOV 
MOV 
CLR 
MOV 

JSR 
BCC 

JSR 

PASS 



014320 177777 



60>: 



62t! 



JSR 

R4.R1 

♦-I.R2 

R3 

4621. R4 

PC.MSLOOP 

60* 

PC. OOPS 



RTS 



PC 



JSR 



.WORD -1 



tSAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 (CALL REGISTER SAVE SUBRT. 

J PASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

tTELL HSLOOP ROUTINE TO CHECK ALL BITS. 

I TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

iTEcL MSLOOP TO CHECK DUMMY NON ZERO UORD. 

I DELAY THE REQUESTED « OF MS. 

(EXIT ROUTINE IF UE TIMED-OUT.] 

«IF NO TIME-OUT. BAD PROGRAM OR HOST MACHINE. 

(RESTORE GPRS. 

PC.aCSP)* :RETURN TO PREG05 SUBRT. 



iDUMMY. NON -ZERO WORD. 



CrOHVBO OHU 11 fUHC IS» PM»12 

CLoe/M. bceftoufiic 

2958 
2B40 

294$ 
2B44 
2845 
2646 
2647 
2646 
2649 
2650 
2651 
2652 
265S 
2654 
2655 
2656 
2657 
2)56 
2659 
2660 
2661 
2662 
2665 
2664 
2665 
2666 
2667 



H4CfK> ni200 

0H4eur 
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.SBTTL GLOBAL SUBROUTINE 



DTMBur 



OHA FRON AOOR BUFBAS • 
TNIS SUBROUTINE INITIATES A OfIA FRON THE AOORESS BUFBAS AND WAITS 
FOR IT TO COMPLETE AND THE LAST CHARACTER TO BE RECIEVED. THE LINE 
ON IMICH TO PERFORM THE OHA AND THE NUMBER OF CHARACTERS TO TRANSMIT 
ARE PASSED AS IM>UT PARAMETERS. 

UMTS: Rl LINE NUMBER ON UHICM TO PERFORM THE DMA. 

RS - NUMBER OF CHARACTERS TO TRANSMIT. 
CSRA • CONTAINS THE AOORESS OF THE CSR. 
ERRNBR • CONTAINS THE ERROR NUMBER OF THE FIRST ERROR 
IN THIS SUBROUTINE. 

OUTPUTS: CARRY - SUCCESS FLAG - SET IF OMA COMPLEATED SUCCESFULLt. 

CLEAR IF OHA START BIT FOUND SET OR 
NO TX ACTION RECIEVED. 
CONTENTS ALTERED TO INITIAL ERRNBR * I. 



CALLING SEQUENCE: 



COMTCNTS: 



JSR 



PC.OMABOT 



THIS ROUTINE RETURNS CARRY CLEAR IF AN ERROR OCCURED. WITH 
THE APPROPRIATE ERROR NUMBER IN ERRNBR. A NON-RELATED TEST 
ERROR SHOULD BE REPORTED. UPON RETURN TO THE TEST. IF THE CARRt 
FLAG IS CLEAR. THIS ROUTINE REPORTS ERRORS. 
INITIAL ERRNBR THRU INITIAL ERRNBR • 1. 

SUBORDINATE ROUTINES CALLED: DELAY .DOOMA.MAIBIS. 



2666 
2669 
2670 
2871 
2872 
2875 
2874 
2675 
2676 
2877 
2878 
2879 
2880 
2881 
2882 
2885 

2884 



014522 
014522 
014526 
014552 
014556 



014540 
014544 
014550 
014554 
014560 
014562 
014566 
014572 
014574 
014574 
014576 



004567 167552 

012702 002650 

004767 000042 
105016 



005267 
012701 
016702 
004767 
105005 
012704 
004767 
000261 

004756 
000207 



167506 
170556 
165652 
005056 

000005 
177670 



OMABUF:: SAVE 

MOV 
JSR 
BCC 

! MAir FOR THE 
I FOR THE LAST 

INC 
MOV 
MOV 
JSR 
BCC 

MOV 
JSR 
SEC 

601: PASS 
RTS 



JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

•BUFBAS.R2 iPASS THE START AOOR OF THE BUFFER TO TX. 

PC.DOOMA {INITIATE THE DMA. 

60t {RETURN UlTH FAILURE IF DMA- START BIT FOUND SET. 

DMA TO COMPLEATE I.E A TX -ACTION BEING RETURHEO. AND THEN UAIT 
CHARACTER TO BE RECIEVED. 



•170556. Rl 

CSRA.R2 

PC.UAIBIS 

60* 

#5.R4 

PC. DELAY 



tSET THE ERROR NUMBER TO INITIAL ERRr«R • 1. 
•INDICATE TO TEST 6IT15 WITH TIME OUT OF 550 MS 
iPASS THE AOOR OF THE REG TO TEST. 
•WAIT FOR THE TX ACTION. 

iRETURN WITH FAILURE IF NO TX -ACTION FOUND. 
iSCT THE DELAY OF 5 MS. 

tUAIT FOR THE LAST CHARACTER TO BE RECIEVED. 
I SET THE CARRY FLAG TO INDICATE SUCCESS. 



PC 



JSR 



PC,B(SP)» 
iRETURN. 



iRETURN TO PREG05 SUBRT. 
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^aa6 

2680 
2664 
2690 
2691 
2692 
2695 
2694 
2695 
2696 
2897 
2696 
2699 
2900 
2901 
2902 
2903 
2904 
2905 
2906 
2907 
2906 
2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 

2917 
2916 
2919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
2927 
2928 



2929 



2950 
2931 
2932 
2933 
2934 
2935 
2936 
29S7 



.S8TTL GLOBAL SUBROUTINE 



DOOfIA 



014400 
014400 
014404 



004567 
012704 



167454 
000200 



014410 
014410 
014412 
014414 
014414 
014420 
014422 
014426 
014432 
014436 
014440 
014442 
014446 
0144S2 



104440 

010005 

012700 
104441 
056701 
010177 
105777 
000241 
100411 
010377 
010277 
110477 



000340 

165630 
165574 
165604 



165576 
165566 
165564 



- INITIATE DMA TRANSMISSION ROUTINE - 
THIS ROUTINE WRITES THE DMA PARAMETER TO THE SPECiriED DEVICE AND 
INITIATES THE DMA TRANSMISSION. 



INPUTS: 



OUTPUTS: 



Rl - LINE NUMBER ON UHICH TO INITIATE THE DMA. 

R2 • START ADDRESS OT THE DMA BUFFER (16 BIT VIRTUAL). 

R3 • CHARACTER COUNT OF THE DMA BUFFER. 

CSRA • CONTAINS ADDRESS OF THE DUT CSR. 

lESTAT • STORAGE rOR STATES OF THE INTERRUPT ENABLE BITS. 
TXAOIA - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG 41. 
TXA02A - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG #2. 
TXBFCA - CONTAINS ADDRESS OF DMA CHARACTER COUNT REGISTER. 

CARRY - SUCCESS FLAG (SET IF DMA. ST ART FOUND CLEAR). 

OUT TBUFFADl - LS 16 BITS OF DMA BUFFER ADDRESS (INITIALIZED). 

OUT TBUFFAD2 - MS 6 BITS OF DMA BUFFER ADDRESS (INITIALIZED). 

DMA.START BIT SET. 
DUT TBUFFCT - DMA BUFFER CHARACTER COUNT (INITIALIZED). 



CALLING SEQUENCE: 



JSR 



PC.OODMA 



COMMENTS: THIS ROUTINE ASSUMES MEMORY MANAGEMENT IS DISABLED AND 

CLEARS THE TUO MSB OF THE DMA ADDRESS. I.E. BITS 0 AND 1 
OF THE TBUFFAD2 REG. 

SUBORDINATE ROUTINES CALLED: NONE. 



DODMA:: SAVE 
MOV 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 tCALL REGISTER SAVE SUBRT. 

•200.R4 {PREPARE TO CLEAR UPPER 6 BITS OF DMA BUFF ADR. 



URITE THE DMA PARAMETERS OUT TO THE OUT DMA REGISTERS. 
DISABLE INTERRUPTS. 
SET UP OUT CSR IND.ADR.REG FIELD. 
URITE THE DMA TRANSMIT CHARACTER COUNT. 

URITE THE LEAST SIGNIFICANT 16 BITS OF THE DMA BUFFER START ADDRESS. 
URITE THE MOST SIGNIFICANT 6 BITS OF THE ADDRESS. 

SETTING THE DMA.START BIT, AND INITIATING THE DMA TRANSMISSION. 



6«: 



GETPRI 



SETPRI 



BIS 
MOV 
TSTB 
CLC 
BMI 
MOV 
MOV 
MOVB 



R5 iGET THE PRESENT PROCESSOR PRIORITY. 

TRAP CtC-PRI 
MOV R0.R5 

•PRI07 iDISABLE ALL HARDWARE INTERRUPTS. 

MOV «PRI07.R0 
TRAP CtSPRI 

lESTAT.Rl {PREPARE FOR SETUP OF LINE NUMBER IN OUT CSR. 

R1.0CSRA iSET UP THE OUT CSR IND.AOR.REC FIELD. 

STXA02A I TEST THE DUT DMA.START BIT. 

{INDICATE FAILURE IN CASE DMA. HO BIT IS SET. 
601 {EXIT WITH FAILURE IF DMA. HO BIT IS SET. 

RS.BTXBFCA tURITE THE DMA CHARACTER COUNT. 

R2.«TXAD1A {URITE THE LS 16 BITS OF BUFFER ADDRESS. 

R4.8TXAD2A (WRITE MS 6 BITS OF ADR AND START DMA TX. 



295a 014456 

014456 010500 
014460 104441 

2959 014462 000261 

2940 

2941 014464 
014464 004756 

2942 014466 000207 
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SEO 81 



SETPftI R5 iRESTORE THE PROCESSOR PRIORITr. 

MOV R5.R0 

TRAP CISPRI 

SEC » INDICATE SUCCESS. 

601: PASS iRESTORE GPRS, 

JSR PC.S(SP)* iRETURN TO PREGOS SUBRT. 

RTS PC I CARRY - SUCCESS FLAG CSET IF SUCCESS;. 



2944 

2945 
2946 
2947 
2946 
2949 
2950 
2951 
2952 
2953 
2954 
2955 
2956 
2957 
295« 
2959 
2960 
2961 
2962 
2963 

2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2975 
2974 
2975 
2976 
2977 
2976 
2979 
2960 
2981 



2982 
2983 
2984 
2985 
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SEQ 82 



014470 
014470 



014474 
014476 
014502 
014506 
014512 
014514 
014516 
014520 
014522 
014524 
014526 
0145S0 
014532 

014534 
014554 
014540 
014544 



004567 167564 



005001 
012705 
016700 
012705 
050500 
001006 
006505 
00S201 
020105 
002772 
000241 
000401 
000261 



010166 
010566 
004756 



000020 
165512 
000001 



000004 
000014 



FINACT 



- FIND FIRST ACTIVE LINE 
THIS SUBROUTINE CALCULATES THE NUMBER OF THE FIRST ACTIVE LINE THAT 
IS FOUND IN THE ACTIVE LINE BIT HAP ACTLNS. 

ACTLNS • CONTAINS THE ACTIVE LINE BIT HAP. 



* 
* 
* 

t INPUTS: 

* OUTPUTS: 
* 

I CALLING SEQUENCE: 

* COHHENTS: 

* SUBORDINATE ROUTINES CALLED: NONE. 



Rl - CONTAINS THE NUMBER OF THE FIRST ACTIVE LINE. 
R5 • CONTAINS THE BIT MAP REPRESENTATION OF THE ACTIVE LINE. 
CARRY SET INDICATES SUCCESS. 



JSR 



PC, FINACT 



FINACT:: SAVE 



jVlNO AN 
I • 

CLR 
MOV 
MOV 
MOV 
BIT 

BNE 
ASL 
INC 
CMP 

BLT 

ac 

BR 

SEC 



2»: 



4t: 
60t: 



PASS R1.R5 



014546 000207 



RTS 



I SAVE CONTENTS OF GPRS RO THRU RS. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

ACTIVE LINE ON UHICH TO PERrORN TK TEST. 

Rl iCLEAR T»C LINE NUMBER COUNTER. 

«NUMLNS.R5 iGET MAX LINE NUMBER. 

ACTLNS.RO tGET THE ACTIVE LINE BIT MAP. 

•1.R5 tSET UP A LINE BIT MASK. 

:)S.RO iLOOK FOR AN ACTIVE LINE. 

41 jBRANCH TO BEGIN TEST IF A LDC HAS BEEN FOUM>. 

R5 I SHIFT TIC BIT MASK FOR 7»€ NEXT LDC. 

Rl I INCREMENT T« LINE NUMBER COUNTER. 

RI.R5 iCHECK IF ALL LDCS HAVE BEEN TRIED. 

21 iLOOP TO TRr TrC ICXT LIIC. 

tCLEAR CARRY BIT. NO ACTIVE LINE FQUM). 

601 {EXIT WITH FAILURE. 

tSET CARRY. SUCCESS. 

{RESTORE GPRS. EXCEPT 
MOV Rl.RlSLOTCSP) tPUT Rl IN STACK SLOT. 

MOV RS.RSSLOTCSP) |PUT RS IN STACK SLOT. 

JSR PC.OCSP)* iRETURN TO PREG05 SUBRT. 

}R1 • CONTAINS THE NUI«ER OF FIRST ACTIVE Ll»€. 
lR5 • CONTAINS T»€ BIT NAP OF T»C ACTIVE LINE. 
I CARRY > SET INDICATES SUCCESS. 



PC 
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2<»87 
2960 
2«»69 
2990 
2991 
2992 
2993 
2994 
2995 
2996 
2997 
2998 
2999 
SOOO 
3001 
3002 
3003 
3004 
5005 
3006 
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SEQ 8S 



3007 
3006 
3009 
3010 

soil 

3012 
3013 
3014 
5015 

3016 



014550 
014550 

014554 
014560 
014562 
014564 
014566 
014572 

014574 
014574 
014576 



004567 167304 

012702 002650 
005003 
110322 
005203 

020227 003250 
103773 



004736 
000207 
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INOATP 



INITIALISE DATA PATTERN 
THIS SUBROUTINE IS USED TO INITIALISE AN INCREMENTAL BTTE DATA PATTERN 
IN THE GENERAL BUFFER AREA. 

THE DATA PATTERN WILL BE SEQUENTIAL FROM 0 TO 255 COECIMAL). 



* 

* 
* 

• INPUTS: 
* 
« 

• OUTPUTS 

• CALLING SEQUENCE: JSR PC.INIDATP 

• COMMENTS; 

• SUBORDINATE ROUTINES CALLED: NONE. 



BUF6AS - ADDRESS OF THE START OF THE GENERAL BUFFER AREA. 
BUFMIO - ADDRESS OF THE 255 TH L0CATI0f4. 

THE FIRST 255 LOCATIONS OF THE GENERAL BUFFER AREA CONTAIN DATA 



INOATP:: SAVE 



21: 



JSR 



MOV 


•BUFaAS.R2 


CLR 


RS 


MOVB 


RS.(R2)* 


INC 


RS 


CMP 


R2.«eumio 


BLO 


2t 



{SAVE CONTcNTS OF GPRS RO THRU RS. 
RS.PREG05 tCALL REGISTER SAVE SUBRT. 

I INITIALIZE THE DATA PATTERN IN THE GENERAL 
( DATA BUFFER TO A 256 BYTE PATTERN. 

!sELECT THE NEXT CHARACTER. 

lC»CCK IF UE HAVE 256 DATA PATTERNS. 



60«: 



PASS 
RTS 



JSR 



{RESTORE OPRS. 
PC.SCSP)* 



{RETURN TO PREG05 SU6RT. 



5018 
3019 
S020 
3021 
3022 
3023 
3024 
3025 
3026 
3027 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3036 
3039 

3040 
3041 
3042 
3043 
3044 
3045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 
3053 
3054 
3055 
3056 
3057 
5058 

3059 



014600 
014600 



014604 
014610 
014612 
014614 
014616 
014622 
014624 
014626 
014632 
014634 
014636 
014642 

014644 
014644 
014646 
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PAGE 65 



SEO 84 



004567 167254 



012702 
005003 
110322 
105203 
122703 
001001 
105203 
122703 
001001 
105203 
020227 
103763 



004736 
000207 



002650 

000021 
000023 
003250 



INDTPX 



- INITIALISE DATA PATTERN UITHOUT XON OR XOTf . 
THIS SUBROUTINE IS USED TO INITIALISE AN INCRCMENTAL BYTE DATA PATTERN 
IN THE GENERAL BUFFER AREA. 

THE DATA PATTERN WILL BE FROM 0 TO 255. BUT ULL EXCLUDE THE FOLLOUING 
TWO CHARACTERS I (ASCII DCl. DC3) XON AND XQFF. THIS WILL CAUSE THE 
LAST TWO DATA CHARACTERS TO BE THE SAME AS THE FIRST TUO. 

INPUTS: BUFBAS - ADDRESS OF THE START OF THE GENERAL BUFFER AREA. 

BUFMID - ADDRESS OF THE 255 TH LOCATION. 

OUTPUTS: The FIRST 255 LOCATIONS OF THE GENERAL BUFFER AREA CONTAIN DATA 

CALLING SEQUENCE: JSR PC, INDTPX 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



INDTPX:: SAVE 



jSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 (CALL REGISTER SAVE SUBRT. 



INITIALIZE THE 256 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN IS FREE FROH XON' S OR XOFF'S TC PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 



2(: 

4$: 

6t: 
601: 



MOV 


48UFBAS.R2 


(INITIALIZE THE DATA PATTERN IN THE GENERAL 


CLR 


R3 


1 DATA BUFFER TO A 256 BYTE PATTERN. 


M0V8 


R3.(R2)» 




INCB 


R3 


'select THE NEXT CHARACTER. 


CMPB 


•21. R3 


1 CHECK FOR AN XON CHARACTER. 


BNE 


41 


tBRANCH IF CHAR NOT AN XON. 


INCB 


R3 


(FORCE THE NEXT CHARACTER. 


CMPB 


•23.R3 


(CHECK FOR AN XOFF CHARACTER. 


BNE 


6< 


(BRANCH IF NOT AN XOFF CHARACTER. 


INC8 


R3 


(FORCE THE NEXT CHARACTER. 


CMP 


R2.4BUFHID 


(CHECK IF WE HAVE 256 DATA PATTERNS. 


BLO 


2( 


i 


PASS 




(RESTORE GPRS. 




JSR 


PC.aCSP)* (RETURN TO PREG05 SL«RT 


RTS 


PC 
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SEQ 65 



3061 
5062 
3065 
5064 
5065 
5066 
5067 
3068 
5069 
5070 
5071 
5072 
50-5 
5074 
5075 
5076 
5077 
5076 
5079 
5060 
5061 
5062 
3063 
5064 
3065 

3086 
3087 
3086 
3089 



3090 



014650 
014650 
014654 
014660 
014662 
014666 
014666 
014672 
014674 



004567 167204 

042701 177760 
006501 

016100 002536 

010066 000002 

004736 

000207 
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- '-^'^ NUMBER TO BIT MAP CONVERSION SUBROUTINE 
I-ilr.^i^''9*^^J^^ *JSED TO GENERATE A BIT MAP (ONE BIT OF 16 SET) 
BASED ON A LINE NUMBER (RANGE: I TO 16). ONLT THE LS 4 BUS OF THE 
biSfr^^^"9*'2.2''^ •JSED. THE OTHERS ARE MASKED OUT (SO UiSaSKEO 
MSBYTES OF DUT CSRS CAN BE PASSED TO THIS ROUTINE WITHOUT ERROR) 



♦ INPUTS: 



OUTPUTS: 



RO 



BIT MAP. BIT CORRESPONDING TO LINE NUMBER IS SET- 
IF LINE NUMBER IS 3. THEN BIT5 IS SET. ETC? ' 



* CALLING SEQUENCE: 



JSR 



PC. LINBIT 



♦ COMMENTS: NO CHECKING IS PERFORMED TO VERIFY THAT THE LINE NUMBER IS 

♦ A LEGAL LINE NUMBER FOR THE OUT (IE - LESS THAN NuS^NS) 

• NOTE: THELINE NUMBER IS NOT DESTROYED OF ALTEREOTSO THIS 

• ROUTINE CAN BE USED EASILY IN LOOPS. 

* SUBORDINATE ROUTINES CALLED: NONE. 



LINBIT:: SAVE 



60t: 



BIC 
ASL 
MOV 
PASS 



RTS 



JSR 
♦177760. Rl 
RI 

BITTBL(R1).R0 
RO 

MOV 
JSR 

PC 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 jCALL REGISTER SAVE SUBRT. 

iMASK OUT ALL BUT 4 LSBITS OF THE LINE #. 
.MULTIPLY LINE ♦ BY 2 TO GET UQRD TABLE OFFSET. 
iGET THE SINGLE BIT BIT MAP. 
•RESTORE GPRS. EXCEPT THE FOLLOWING. 
20.R0SL0T(SP) jPUT RO IN STACK SLOT. 

JRETURN TO PREG05 SUBRT. 
iRO BIT MAP WITH Lirt ♦ BIT SET. 



CZOHVBO OHU II fUHC TST PART2 
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3092 
3093 
3094 
3095 
3096 
3097 
3098 
3099 
3100 
3101 
3102 
3103 
3104 
3105 
3106 
3107 
3108 
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SEO 86 



3109 
3110 
3111 
3112 
3113 
3114 
3115 
3116 
3117 
3118 
3119 



3120 



014676 
014676 
014702 
014704 

014706 
014710 

014712 
014714 
014716 

014720 
014720 
014724 
014726 



004567 167156 

010201 

001405 

005002 
000261 

005502 
006301 
001375 



010266 000006 

004736 

000207 
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MAPCNT 



- COUNT BITS IN BIT MAP ROUTINE • 
THIS SUBROUTINE COUNIS THE NUMBER OF BITS WHICH ARE SET IN A BIT MAP. 



♦ INPUTS: R2 - 

♦ OUTPUTS: R2 - 

♦ CALLING SEQUENCE: 

♦ COMMENTS: 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



THE BIT MAP FOR WHILH TO COUNT THE BITS. 
COUNT OF THE NUMBER OF BITS THAT WERE SET. 
JSR PC, MAPCNT 



MAPCNT:: SAVE 

MOV 
BEQ 



21: 



601: 



CLR 
SEC 

ADC 
ASl 
6NE 

PASS 



RTS 



R2,R1 
601 

R2 



R2 
Rl 
21 

R2 



PC 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT. 

tEXIT WITH ZERO IF NO BITS ARE SET IN MAP. 

iCLEAR THE BIT COUNT. 

iCOUNT THE LAST BIT TO BE SHIFTED OUT. 

iCOUNT THE BIT IF IT WAS SET. 

s SHIFT ANOTHER BIT OUT OF THE MAP. 

iLOOP IF ALL BITS NOT SHIFTED OUT OF MAP. 

iRESTORE GPRS. EXCEPT THE FOLLOWING: 
NOV R2.R2SL0T(SP) tPUT R2 IN STACK SLOT. 

JSR PC.6CSP)* sRETURN TO PREG05 SUBRT. 

I R2 - COUNT OF BITS SET IN BIT MAP. 
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3122 
3125 
3124 
5125 
5126 
5127 
3128 
3129 
5130 
5151 
3132 
5133 
3134 
315b 
5136 
5137 
3136 
3159 
5140 
5141 
5142 
5145 
5144 
5145 
5146 
5147 
3146 
3149 
5150 
3151 
5152 
5155 
5154 
5155 
5156 
3157 
3156 
3159 
3160 
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MSLGET 



« - MILLI SECONDS LOOP WHICH RETURNS READ UORO AND REHAINING TIHE 

* THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

* TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TINE -OUT PERIOD, THE 

* CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED ^OR THE 

* DESIRED CONDITION AND THE TIME -OUT VALUE IN MILLI -SECONDS. 

* THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

* ROUTINE AND THEN ONCE EACH MILLI-SECOND THERE AFTER. 

* UPON RETURN. THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 

* IS RETURNED BY THIS SUBROUTINE. 

* INPUTS: ni - TIME-OUT VALUE IN MILLI-SECONOS (UP TO 64K MS). 

* R2 - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 
« RS - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

A R4 - ADDRESS OF THE WORD TO TEST. 

* MSLCNT • MILLI SECOND SOFTWARE I OOP COUNT. 

t OUTPUTS: RO - THE LAST WORD WHICH WAS READ TO CHECK rQR THE CONDITION. 

* Rl - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

* CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME OUT). 



* CALLING SEQUENCE: 



JSR 



PC. MSLGET 



* COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

* CALIBRATION IS ONLY GUARENTEEO MCN A LINE CLOCK IS AVAILABLE 

* ON THE SYSTEM. 

* THIS ROUTINE CAN BE USED AS A DELAY ROUTINE. BY SPECIFYING THE 

* DESIRED DELAY AS THE TIME-OL'T AM) SPECIFYING A CONDITION TO 

* LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

* IF A TIME-OUT VALUE OF 0 IS SPECIFIED. THIS ROUTINE CHECKS FOR 

* THE ObSIREO CONDITION BEFORE RETlflNING. IT IWXCATES SUCCcSS 

* IF THE CONDITION IS MET. FAILURE OTHERWISE. 
* 

* SUBORDINATE ROUTINES CALLED: NONE. 



3161 
3162 
3163 
3164 
3165 
3166 
5167 
5168 
3169 
5170 
3171 
5172 
5175 
5174 
5175 
5176 
5177 



014730 

014730 004567 167124 



014734 005102 
014736 040203 



014740 005701 

014742 001011 

014744 011400 

014746 010067 000070 

014752 040200 

014754 020005 

014756 000261 

014760 001420 



JSR 



tSAvE CONTENTS OF GPRS RO TMIU R5. 
RS.PREG05 tCALL REGISTER SAVE SUBRT. 



MSLGET:: SAVE 

!*SET UP MASK FOR REMOVING UNUSED BITS IN T»C TEST WORD. Ai4> CLEAR UNUSED 
I BITS IN THE OeSXREO STATE WORD TO ALLOW DIRECT COW»ARISON. 



COM 
BIC 



R2 

R2«RS 



{GET MASK OF UHUSED BITS. 

{MASK OUT UNUSED BITS IN DESIRED STATE UORO. 



! 'handle 

; - 



THE TEST AND EXIT IF WE HAVE A 0 TIME-OUT VALUE. 



TST 
BNE 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 



Rl 
21 

(R4).R0 
R0.62t 
R2.R0 
RO.RS 

61 



tTEST THE TXME<OUl VALUE FQR ZERO. 
lIF NON-ZERO TIME-OUT. GO LOOP AND TEST. 
(GET THE WORD TO TEST BEFORE EXITING. 
•SAVE VALUE SO WE CAN RETURN IT. 
iMASK OUT UNTESTED BITS OF WORD. 
•COMPARE AGAINST DESIRED STATE WORD. 
•INDICATE SUCCESS IN CASE WORDS ARE EQUAL. 
(EXIT WITH SUCCESS IF WORDS ARF EQLiAL . 
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SEO 68 



51 78 


014762 


000241 




31 79 


014764 


000416 




3180 








3181 








518P 








3183 


014766 


016705 


165334 


3184 


014772 


011400 




3185 


014774 


010067 


000042 


3186 


OlSOOO 


040200 




3187 


015002 


020003 




3188 


015004 


000261 




3189 


015006 


0O1405 




3190 


015010 


005305 




3191 


015012 


001367 




3192 


015014 


005301 




3195 


015016 


001363 




3194 


015020 


000241 




3195 








3196 








3197 








3196 








3199 


015022 


016700 


000014 


3200 


015026 








015026 


010066 


000002 




015032 


010166 


000004 




015036 


004736 




3201 








3202 








3205 


015040 


000207 




3204 








3205 








3206 








3207 


015042 


000000 





cue 

BR 



6t 



s ♦ 



NON-ZERO TIME-OUT VAiUE. 

i 

41: 



MOV 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
CLC 



MSLCNT.R5 
(R4).R0 
R0.62» 
R2.R0 
R0.R3 

C« 
RS 
41 
Rl 
2« 



I INDICATE FAILURE (TIME-OU«). 

(EXIT UITH FAILURE. UOROS AREN'T EQUAL. 

LOOP. WAITING FOR CONDITION OR TIME OuT. 

iLOAO MS LOOP COUNT. 

tCET THE WORD TO TEST. 

I SAVE WORD IN CASE THxS IS THE LAST. 

I MASK OUT UNTESTED BITS OF WORD. 

{COMPARE AGAINST DESIRED STATE UORO. 

I SET CARRY IN CASE OF SUCCESS. 

lEXlT UITH SUCCESS IF UORDS ARE EQUAL 

I COUNT DOUN THE INSIDE MS LOOP COUNT. 

iLOOP IF MS NOT UP. 

{DECREMENT THE MS TIME COU»lT. 

(IF TIME NOT UP. LOOP TO COUNT ANOTHER MS. 

{CLEAR CARRY, WE TIMED -OUT. 



I ♦ 



HAVE EITHER FOUND CONDITION. OP TIMED-OUT CPCSSIBLt FROM C TIME 0«JT VALUE). 
RESTORE THE LAST CONTENTS READ FROM THE TEST UQRD. EXIT ROUTINE. 



{ - 

61: 

60t: 



MOV 
PASS 



RTS 



62t.R0 
RO.Rl 



MOV 
MOV 
JSR 



PC 



!\0CAL STORAGE. 
62t: .WORD < 



{PASS OUT THE LAST READ UQRD. 
tRESTORE GPRS. EXCEPT THE FOLLOWING: 
RO.ROSLOT(SP) {PUT RO IN STACK SLOT. 

Rl.RlSLOT(SP) {PUT Rl IN STACK SLOT 

PC.8CSP)* {RETURN TO PREG05 SUBRT. 

iRO - LAST REM) UQRD CHECKED FOR CO»CITION. 

iRi • REIWINING TIME (0 IF TirC OUT OCCUREO). 

{CARRY - SET IF SUCCESS. CLEAR IF TirC OUT. 



I STORAGE FOR THE LAST READ UORD. 
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5209 
3210 
3211 
3212 
3215 
3214 
5215 
5216 
5217 
5216 
5219 
5220 
5221 
5222 
5225 
5224 
3225 
5226 
5227 
3226 
3229 
3250 
3231 
5252 
5255 
3234 
3235 
3236 
3237 
3238 
5239 
3240 
3241 
3242 
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MSLOOP 



• - TEST LOOP SUBROUTINE - 

• THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

• TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

• CALLING ROUTINE PASSES IN UHICH BITS SHOULD BE SET AND CLEARED FOR THE 

• DESIRED CONDITION AND THE TIME-OUT VALUE IN MILL I -SECONDS. 

• THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

• ROUTINE AND THEN ONCE EACH MILLI-SECOND THEREAFTER. 



• INPUTS: 



• OUTPUTS: 



Rl - TIME-OUT VALUE IN MILLI-SECONOS (UP TO 64K MS). 

R2 - BIT I1AP OF BITS TO TEST (I INDICATES TO TEST THE BIT). 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILL I SECOND SOFTWARE LOOP COUNT. 

CARRY • SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT). 



* CALLING SEQUENCE: 



JSR 



PC. MSLOOP 



* COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT fHE 

* CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAIi ABLE 

* ON THE SYSTEM. 

* THIS ROUTINE CAN BE USED AS A DELAY ROUTINE. BY SPECIFYING THE 

* DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

* LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

* IF A TIME-OUT VALUE OF 0 IS SPECIFIED. THIS ROUTINE CHECKS FOR 

* THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 

* IF THE CONDITION IS MET. FAILURE OTHERWISE. 

* SUBORDINATE ROUTINES CALLED: HSLGET. 



5245 
3244 
5245 
3246 
5247 
5246 
5249 
3250 

5251 



015044 

015044 004567 167010 



015050 004767 177654 
015054 

015054 004756 

015056 000207 



MSLOOP:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR RS.PREG05 tCALL REGISTER SAVE SUBRT. 



CALLING THE MSLGET ROUTINE FROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME-OUT VALUES. 



t - 



60$: 



JSR 
PASS 



PC, MSLGET 

JSR 

PC 



tCALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 
(RESTORE GPRS. 

PC.8(SP)* {RETURN TO PREG05 SUBRT. 

t CARRY - SET IF SUCCESS. CLEAR IF TIME OUT. 
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32*^3 
3254 
3255 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
3266 
3267 
3268 
3269 
3270 
3271 
3272 

3273 
3274 



3275 
3276 



015060 
015060 

015064 
015064 
015066 
015070 
015072 



015074 
015074 
015100 
015104 
015106 
015110 
015114 
015114 
015116 
015120 
015120 
3280 015122 
3281 



3277 

3278 
3279 



SBTTL GLOBAL SUBROUTINE OOPS 
» *************************************** *^ ****** 

- PROGRAM ABORT SUBROUTINE 
THIS SUBROUTINE IS USED TO ABORT THE PROGRAM UHEK A FATAL ERROR IS 
DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDUARE. AN ERROR MESSAGE 
IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 



INPUTS: 
OUTPUTS; 



Rl - ERROR CODE GIVING REASON FOR ABORT. 
AN ERROR MESSAGE IS PRINTED. 

A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 



JSR 



PC. OOPS 



CALLING SEQUENCE: 
COrtlENTS: 

SUBORDINATE ROUTINES CALLED: NONE 



: - ■ 



004567 166774 



104454 
000145 
015124 
000000 



OOPS 



012746 
012746 
010600 
104417 
062706 

104422 
000776 

004736 
000207 



015210 
000001 



000004 



2>: 
60>: 



SAVE tSAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 iCALL REGISTER SAVE SUBRT 

t REPORT "HOST COMPUTER HARDUARE OR SOFTWARE BUG ENCOUNTERED." ERROR. 
ERRSF lOl.EMOlOl 

TRAP 
.WORD 
.WORD 
.WORD 

: REPORT "PROGRAM HUNG. WAITING FOR A CONTROL -C." 
PRINTF «En0102 

MOV 
MOV 
HOV 
TRAP 
ADD 

iLOOK FOR OPERATOR CONTROL -C IMMT. 

TRAP 

» INFINITE LOOP. 

iDON'T NEED THIS. BUT SOMEBODY MAY CHANGE THIS 
PC.8CSP)* ;RETURN TO PREG05 SUBRT 

: ROUTINE IN THE FUTURE. SO BE CONSISTANT. 



BREAK 
BR 

PASS 
RTS 



CIERSF 
101 

EMOlOl 
0 



•EM0102. CSP) 
•l.-CSP) 
SP.RO 
C»PNTF 
•4.SP 



2> 



PC 



C«BRK 



JSR 



3282 015124 


110 


117 


123 EMOlOl 


015127 


124 


040 


103 


015132 


117 


115 


120 


015135 


125 


124 


105 


015140 


122 


040 


110 


015143 


101 


122 


104 


015146 


127 


101 


122 


015151 


105 


040 


117 


015154 


122 


040 


123 


015157 


117 


106 


124 


015162 


127 


101 


122 


015165 


105 


040 


102 


015170 


125 


107 


040 


015173 


105 


116 


103 


015176 


117 


125 


116 


015201 


124 


105 


122 



.ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED./ 



N7 



CZOHVBO OHU-11 FUNC TST PARr2 MACRO hl200 IS MAR-e4 09:26 PAGE 70-1 
GLOBAL SUBROUTINE OOPS - 



015204 


4 AC 

105 


4 Ail 

104 


AC^ 

05d 


015207 


AAA 

000 






5265 015210 


Ail C 

045 


4 4 £ 

116 


Ail C 

045 


015215 


4 A4 
101 


4 OA 

120 


1 oo 
122 


015216 


4 4 7 

117 


4 A 7 

107 


4 OO 

122 


015221 


4 A4 

101 


4 1 C 

115 


AAA 


015224 


4 4 A 

110 


4 OtC 

125 


1 1 iL 

lib 


015227 


107 


ac^ 
054 


Ail A 

040 


015252 


4 f% f 

12 r 


4 A1 

101 


111 

111 


015255 


4 Oil 

124 


111 

III 


1 1 

llo 


A 4 Oil A 

015240 


4 A7 

107 


/VA A 


1 t\c 
lUO 


At Oil V 

015245 


4 4 "7 
11 f 


122 


AAA 

o«*u 


015246 


4 A 1 

101 


AAA 


1 f\X 


015251 


4 4 7 

117 


llo 


1 OA 

12** 


015254 


4 *50 

122 


11 f 


1 1 A 

11*» 


015257 


Q55 


1 AV 




O15co2 


/\Af\ 

vWU 


fSIA 


AQO 


U15cOD 




U3c 












015273 


052 


052 


052 


015276 


052 


052 


052 


015301 


045 


116 


045 


015304 


116 


000 





.ASCIZ /tftMAPROGRAM HUNG. WAITING FOR A CONTROL -C. 



3284 .EVEN 



L/OHVBO OMU II f\Mt: 
CtOBM. ^t.«ffOUTINE 

5^06 

S2BT 
SiB6 

5290 
5291 
5292 
$295 
529* 
52*H 
529t> 
5297 
5299 
5299 
S500 
S501 
9302 
550S 
AS04 
SS05 
5306 
5507 
5508 



MACW n\200 



IS 84 09:26 PACE 71 

.SarTL GLOBAL SUBROUTINE 



SEQ 92 



PRTLPR 



-PRINT THE CONTENTS V THE LPR. 
THIS ROUTINE 13 USED TO PRINT OUT EXTENDED IITORmTiaN ON THE 
CONTENTS OF THE LINE PMMCTER REGISTER (LPR). 

I»«>UTS: R5 CONTAINS THE NUMBER OF THE LINE YOU MISH TO EXAMINE. 

CSRA • CONTAINS THE ADDRESS OF THE DUT'S CSR. 

lESTAT • CONTAINS THE CURRENT STATUS OF THE TX AND Rx INTERRUPT 

ENABLE BITS IN THE OUT'S CSR. 
LPRA • CONTAINS THE ADDRESS OF THE OUT S LPR REGISTER. 

OUTPUTS: AN EXTENDED ItrORMATION MESSAGE IS PRINTED ON THE OPERATORS 

CONSOLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC.PRTLPR 



THIS ROUTINE CHANGES THE INDIRECT ADDRESS FIELD OF THE DEVICE 
UNDER TEST'S CSR. 



SUBORDINATE ROUTINES CALLED: NONE. 



5509 


015506 








015506 


004567 


166546 


5510 


015512 


016701 


164710 


5511 


015316 


016702 


164710 


5512 


015522 


042705 


177760 


5515 


015526 


056705 


164724 


5514 


015552 


010511 




5515 


015554 


011204 




3516 








5317 


015556 








015556 


010446 






015540 


012746 


011100 




015544 


012746 


005054 




015550 


012746 


000005 




015554 


010600 






015556 


104415 






015560 


062706 


000010 


3318 


015564 








015564 


004756 




3319 


015566 


000207 





PRTLPR: :SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG0S iCALL REGISTER SAVE SUBRT. 

iCET THE CSR ADDRESS. 
iGET THE LPR ADDRESS. 
I CLEAR ANY UNWANTED BITS. 

iSET STATE OF TX AND Rx INTERRUPT ENABLE BITS. 
{SELECT LINE. 
iGET CONTENTS OF THE LPR. 
tPRINT MESSAGE "CONTENTS OF THE LPR:N»MNNN'- 

PRINTX •EF9019.«EM9026.R4tPRINT OUT MESSAGE ON OPERATORS CONSOLE. 



MOV 
MOV 
BIC 
BIS 
MOV 
MOV 



JSR 

CSRA.Rl 
LPRA.R2 
•177760. R5 
IESTAT.R5 
R5.CR1) 
(R2).R4 



601: 



PASS 
RTS 



PC 



{RESTORE GPRS. 
JSR PC.8(SP). 



MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 



R4, (SP) 
•EM9026. 
•Er90l9. 
»3. (SP) 
SP.RO 
CIPNTX 
•10. SP 



(SP) 
(SP) 



(RETURN TO PREG05 SUBRT. 



5521 
5522 
5525 
5524 
552S 
5526 
5527 
5528 
552^ 
5550 
5551 
5552 
5555 
5554 
5555 
5556 
5557 
5558 
5559 
5540 



5541 
5542 
5545 
5544 
5545 
S54o 
5547 
5548 
5549 
5550 
5551 
5552 
5555 
5554 
5555 
5556 
5557 
5556 
5559 
5560 
5561 
5562 
5565 
5564 
5565 

5567 

5368 
5S69 



015570 
015570 
015574 
015400 

015404 
015406 



015410 
015414 
015416 



015420 
015424 
015426 
015450 

015454 
015456 
015440 
015442 
015444 

015446 
015446 

015450 



004567 
012701 
016704 

011402 
100016 



012700 
040200 
001006 



012700 
040200 
001002 
004767 

005501 
001562 
000241 
000401 
000261 



004756 

000207 
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.SBTTL GLOBAL SUBROUTINE 



SEO 95 



166464 
001000 
164624 



070000 

OOOSOl 
001044 



- PUTIFO 



- PURGE THE riro 

THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS TROM THE FIFO. 
ANY BMP COOES THAT ARE FOUND ARE ''.AVED ON THE BMP CODE QUEUE. 



* INPUTS: 



RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 



• OUTPUTS: 

t CALLING SEQUENCE: 

* COMMENTS I 



CARRY BIT - INDICATES THE STATE OF THE FIFO. SET;- PURGED, 
BMPCQ - THE CONTENTS OF THE BMP CODE QUEiJE MAY BE UPDATED. 



JSR 



PC.PUTIFO 



* SUBORDINATE ROUTINES CALLED: SAV6MP. 



PUFIFO::SAVE 

MOV 
MOV 



2t! 

I ♦ 
I 
t 
I 



MOV 
BPL 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG0S iCALL REGISTER SAVE SUBRT. 

♦512..R1 iSET MAXIMUM TRY COUNT OF 512. 

R8UFA.R4 tCET ADDRESS OF THE RECEIVER BUFFER REGISTER. 

(R4).R2 iGET THE CONTENTS OF THE RECEIVER BUFFER REG. 

6t lEXlT IF THE FIFO IS EMPTY. DATA.VALIO CLR. 



CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
IF IT IS. THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 



MOV 
6IC 



•70000.ro {GENERATE A BIT MAP OF CHAR ERROR BITS 

R2.R0 I MHICH ARE NOT SET FOR CHAR. 

4t iTHROU CHAR AUAY IF NOT BMP OR SELFTEST CODE. 



I* 



I CHECK IF THE READ DATA IS MODEM STATUS . BMP OR SELFTEST?. 



4t: 

6«: 
601: 



MOV 

b:c 

BNE 

JSR 

DEC 
BNE 

CLC 
BR 

SEC 

PASS 



RTS 



#501. RO 

R2.R0 

4t 

PC.SAVBMP 

Rl 
21 

60t 



JSR 



PC 



I C«CK IF BMP. 

I TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

ilF IT IS MODEM OR SELFTEST CODE T»«OM IT AUAY. 

iSAVE BMP CODE ON T»C QUEUE. 

iDECRCtCNT T»€ TRY COUNT. 
iLOOP TO TRY AGAIN. 

iCLEAR CARRY. TO INDICATf^ FIFO NOT PURGED. 

•EXIT WITH CARRY CLEAR. 

I SET CARRY. TO INDICATE FIFO PURGED. 

•RESTORE GPRS. 

PC.BCSP)* iRETURN TO PREG05 SUBRT, 

iCARRY BIT. SET INDICATES FIFO PURGED. 
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3EQ <M 



5571 
5572 
5575 
5574 
5575 
5576 
5577 
5578 
5579 
5580 
5581 
5582 
5585 
5584 
5585 
5586 
5587 
5588 
5589 
5590 
5591 
5592 
5595 
5594 
5595 
5596 
5597 
5596 
5599 

5400 
540L 
5402 
5405 
5404 
5405 
5406 
5407 
5408 
5409 
5410 
5411 
5412 
5415 
5414 
5415 
5416 
5417 
5418 
5419 
5420 
5421 
5422 
5425 
5424 
5425 
5426 



.SBTTL GLOBAL SUBROUTINE 



PUFIFR 



015452 

015452 004567 166402 

015456 016746 166570 

015462 012705 001000 



015466 017702 164556 
015472 100065 



015474 012700 070000 
015500 040200 
015502 001012 



015504 012767 012544 

015512 012700 000500 

015516 040200 

015520 001005 

015522 004767 000752 

015526 000450 



166544 



- PURGE FIFO REPORT ANY ERRORS FOUND. 

THIS ROUTINE REMOVES ALL DATA FROM TME FIFO. ANY BMP COOES THAT ARE 
FOUND ARE SAVE ON THE QUEUE TO BE REPORTED LATER IN THE BMP REPORT TEST. 
ANY UNXEPECTEO DATA (IE ANY NON-STATUS INFQRAMTION) THAT ARE FOUND. 
AHE REPORTED AS AN ERROR* 

IF TME FIFO MILL NOT PURGE AFTER 512 ATTEMPTS. THEN THE CURRENT TEST 
THAT CALLED THIS ROUTINE RECEIVES A FAILURE FLAG THAT SHOULD BE USED 
TO ABORT THE TEST. 

ERRTBL ERRTYPE. ERRMSG. ERRNBR ARE SET UP CORRECTLY. 
R6UFA CONTAINS THE ADDRESS OF THE RECEIVER. 

CARRY BIT • ABORT TEST FLAG. CLR - ABORT TEST. SET - OK. 
ERRBLK ■ VALUE WILL BE OASTROYEO. 

BMPCQP • THE BMP CODE QUEUE POINTER MAY BE UPDATED. 
THE CONTENTS OF THE BMP CODE QUEUE MAY BE 'XATED. 



* 

* 
* 

* 
* 

I INPUTS: 
* 
* 

* OUTPUTS; 

* 

* 

* CALLING SEQUENCE: 

* COMMENTS: THIS ROUTINE REPORTS ERRORS MITH NU»«ERS INITIAL ERRNBR 

* THRU TO ERRNBR*2. 

* THE ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE RETURNING. 

* SUBORDINATE ROUTINES CALLEOt ER160S.Eft9001.ER9002.SAV8MP. 



JSR 



PC.PUFIFR 



JSR 
».-tSP) 
•5U..RS 



PUFirR::SAVE 

MOV 
MOV 

!*REAO OATA fRQN TIC fVO UNTIL 
t REPORT ANY OR UNEKPECTEO 

kit tttV BRMFA.Ra 

bPL 

t ♦ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
RS.PREG05 I CALL REGISTER SAVE SUBRT. 

I SAVE THE CONTENTS OF T»C ERROR NlffSER. 
iSET HAXIMUN READ COUNTER TO 2*rir0 SIZE. 

DATA VALID IS aEAR OF READ COUNTER IS ZERO. 
DATA AS ERRORS. 

iGET THE CONTENTS OF T»C RECEIVER BUFFER REG. 
lEXIT ir DATA VALID CLEAR. IE. FIFO PURGED. 



t C»CCK IF READ DATA IS STATUS OR UNEXPECTED CHARACTER. 



I- 



MOV 
BIC 
BNE 



•70000*R0 

R2.R0 

4$ 



•GENERATE A BIT rWP OF CHAR ERROR BITS 

I WHICH ARE NOT SET FOR CHAR. 

I SKIP BMP DCCK IT II IS UNEXPECTED DATA. 



! 'check if T»C read data is nOOEH STATUS . BMP OR SELFTEST?. 
I IF IT IS A CODE THEN SAVE IT ON TME OUEUE. 



MOV •ER900I.ERRBLK 

MOV •500.R0 

BIC R2.R0 

BNE 4» 

JSR PC.SAVBMP 

BR 61 



iSET UP T»C C0RREC7 ERROR REPORTING ROUTINE. 

I CMECK IF BMP OR .FTEST?. 

I TRY TO CLEAR BMP ..AGS IN THE READ DATA. 

I SKIP BMP ERROR REPORT IF MODEM OR SELFTEST?. 

tSAVE Tl« BMP CODE ON T»€ QUEUE. 

tBRANCH TO CHECK READ COUNT. 



CHECK IF THE READ DATA IS MODEM. SELFTEST OR UNEXPECTED DATA. 



IC TST PART2 



MAi 
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SEQ 95 





015550 


032702 


00000 I 


5428 


015S54 


00142S 




3429 


015536 


012701 


011124 


3430 


01SS42 


010203 




3431 


015544 


000505 




3432 


01SS46 


042705 


177760 


3433 


015552 


006505 




3434 


015SS4 


052704 


100000 


3435 


015560 


005267 


166266 


3436 


015564 


012767 


012644 


3437 








3436 


015572 
015572 


104460 




3439 








3440 








3441 








3442 


015574 


052767 


000100 


3443 


015602 


001415 




3444 








3445 








3446 


015604 


005567 


166242 


3447 








3446 


015610 


005505 




3449 015612 


001525 




3450 








3451 








3452 








3453 








3454 


015614 


062767 


000002 


3455 


015622 


012767 


012020 


3456 


015630 


012701 


010767 


3457 








3458 








3459 


015634 
015634 


104460 




3460 


015636 


000241 




3461 


015640 


000401 




3462 








3463 


015642 


000261 




3464 








3465 


015644 


012667 


166202 


3466 


015650 
015650 


004736 




3467 








3468 








5469 015652 


000207 





41: 



J TEST THE MODEM STATUS INDICATION BIT. 
iDO NOT REPORT ANY ERROR IF MODEM STATUS. 
iPASS THE CORRECT ERROR MESSAGE TO REPORT. 
I EXTRACT THE LINE NUMBER FROM 
I THE READ DATA. 



166264 



164406 



i 
I 



BIT «eiT0.R2 
BEG 6t 
MOV ♦eM9104,Rl 
MOV R2.R3 
SUAB RS 
SIC «177760.R3 

ASL R3 tFORM LINE NUMBER TIMES k FOR ER9002 ROUTINE. 

BIS «6IT)5.R4 iSET THE "NONE" EXPECTED MAESSAGE FLAG. 

INC ERRNBR iSET ERROR NUMBER TO INTIAL ERRBR»1. 

MOV «ER9002.ERRB*.K i SELECT THE CORRECT ERROR REPORTING ROUTINE. 
iREPORT ERROR "UNEXPECTED DATA FOUND IN FIFO . 
ERROR i > > > > > ERROR <<<<<. 

TRAP C»ERROR 

EXIT WITH FAILURE IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



61: 



t • 



BIT 
BEQ 



DEC 

DEC 
BNE 



«6IT06. OPTION 
7$ 



ERRNBR 



R5 
21 



I EXIT UITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

t DURING THE SOFTWARE QUESTIONS. 

iRESTORE ERROR NUMBER TO INTIAL ERRNBR. 

t DECREMENT READ COUNTER. 

tLOOP TO READ NEXT CHAR FROM FIFO IF COUNT > 0. 



i THE FIFO WILL NOT CLEAR. REPORT THE ERROR AM) INDICATE THAT TEST IS TO 

I BE ABORTED. 



166230 
166226 



I - 



7»: 



6»: 

lot: 
60»: 



ADO tZ. ERRNBR tSET ERROR NUMBER TO INTIAL ERRNBR*2. 

NOV 4ER1603.ERRBLK t SELECT THE CORRECT ERROR REPORTING ROUTINE. 
NOV •EM9017.R1 iPASS THE MESSAGE TO BE REPORTED. 

tREPORT THE ERROR "FIFO UXLL NOT PURGE. (DATA VALID STUCK SET)" 
I -?????? TEST ABORTED". 

ERROR t >>>>> ERROR «<<«<. 

TRAP C t ERROR 
CLC {INDICATE T»€ TEST IS TO BE ABGPTEO. 

BR 101 tEXiT THIS ROUTINE AM) ABORT TiC CURRENT TEST. 



SEC 

MOV 
PASS 



RTS 



101 

(SP)». ERRNBR 
JSR 

PC 



iSET T»€ CARRY. DO NOT ABORT THE TEST. 

{RESTORE INITIAL ERROR NUMBER. 
{RESTORE GPRS. 

PC.SCSP)* {RETURN TO PREG05 SUBRT, 

(CARRt BIT. SET INDICATES FIFO PURGED. 00 NO^ 
I ABORT TIC TEST. 



CZ0HV80 OH" I 11 FUNC TST PART2 
GLOBAL SUBROUTINE 



3471 
54 72 
3475 
34 74 
3475 
3476 
3477 
5478 
3479 
5480 
5481 
5482 
5485 
5484 
5485 
5486 
5487 
3488 
3489 
3490 
3491 

3493 
3493 
3494 
3495 
3496 
3497 
3498 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3508 
3509 
3510 
3511 
3512 
3513 



MACRO M1200 
REAOBX 
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SEQ 96 



3514 



015654 

015654 004567 166200 

015660 005001 

015662 016703 164342 

C15666 011302 

015670 100015 



015672 004767 176100 

015676 103410 

015700 120227 000021 

015704 001003 

015706 012701 006S20 

015712 000402 

015714 005300 

015716 001363 

015720 000261 

015722 000401 

015724 000241 

015726 

015726 010166 000004 

015732 004736 

015734 000207 



SBTTL 



GLOBAL SUBROUTINE 



REA06X 



- READ CHARACTERS FROM THE FIFO AND CHECKS FOR BHPS AND XONS 
THIS SUBROUTINE IS USED IN THE FIHAVL.TST. 

IT READS THE SPECIFIED NUMBER OF CHARACTERS FROM THE FIFO AND CHECKS 
FOR BMP COOES AND XON CHARACTERS. 



INPUTS! 
OUTPUTS: 



RO 
Rl 



CONTAiriS THE NUMBER OF CHARS TO READ FROM THE FIFO. 



CONTAINS ADDRESS OF ERROR MESSAGE TO BE REPORTED 
CLEAR IF NO ERROR FOUND. 
CARRY USED TO INDICATE IF FIFO UAS FOUND EMPTT. CARRY CLEAR. 



JSR 



PC.R".AD 



CALLING SEQUENCE: 
COMMENTS: 

SUBORDINATE ROUTINES CALLED: CMCBMP. 



READBX:: SAVE 



21 



aR 

MOV 
MOV 
BPL 



iSAVE CONTENTS OF GPRS RO THRU R5. 
JSR RS.PREG05 iCALL REGISTER SAVE SUBRT. 

Rl tCLEAR GPR THAT HOLDS T»C AOORESS OF ERRMSG. 

RBUFA.R5 iGET THE AOORESS OF TIC RECEIVER BUFFER REG. 

(RS).R2 iREAO A CMAIMCT0) FROM THE FIFO. 

61 t BRANCH IF FIFO IS EMPTY. 



OCCK IF THE READ CHARACTER ZS A BMP CODE. 
IF IT IS A BMP CODE SAVE IT ON T»C OUEUE TO BE REPORTED LATER. AW) 
ABORT THE TEST. 





JSR 


PC.CHKBHP 




BCS 


61 




CHP6 


R2.421 




BNE 


41 




MOV 


•EHS402.R1 




BR 


61 


4«: 


DEC 


RO 




BNE 


2% 


6t: 


SEC 






BR 


60t 


81: 


ac 




60<: 


PASS 


Rl 



tOCCK IF CHfllMCTEII ZS A 
iBRANCM Zr A BMP CODE MAS FQlfO. 
tOCCK ZF IT ZS AN JON. 
{BRANCH ZF NOT AN HON. 
tPASS T»C NESSAOE TO BE REPORTED. 
tCO EXZT TEST. 
tOECRENENT TIC READ COUNT. 

iSET CARRY TO ZNDICATE SUCCESS. 
lEXZT 

laEAR CARRY BIT TO INDICATE FAILURE. 



RTS 



PC 



MOV 
JSR 



{RESTORE GPRS. 

Rl.RtSLOT(SR) 

PC.BCSP). 



sPUT Rl IN STACK SLOT. 
{RETURN TO PREG05 SUBRT. 



IC TST PAR 12 MAI 
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5516 
5517 
551A 
5519 
5520 
5521 
5522 
5525 
5524 
5525 
5526 
5527 
5528 
5529 
5550 
5551 
3552 
3535 
3554 
5555 
5556 
3557 
5538 
5559 
5540 
5541 
5542 
5545 
5544 
5545 
5546 
3547 
5546 
5549 

5550 
5551 
5552 
5555 
3554 
3555 
3556 
5557 
5556 
3559 
5560 
5561 
5562 
5565 
5564 
5565 
5566 
5567 
3566 
5569 
5570 
5571 



015756 
015736 
015742 
015746 
015752 
015754 
C15760 



015762 
015766 
015770 
015772 
015776 
016000 



016002 
016004 
016010 
016012 
016014 



.SBTTL GLOBAL SUBROUTINE: 



REPOER 



- REPORT DATA ERROfiS - 
THIS SUBROUTINE IS USED TO REPORT INCORRECT CHARACTERS AND LINE 
NUMBERS IN A WORD OF DATA READ FROM THE RXFIFQ. THIS ROUTINE 
CHECKS FOR THE NUMBER OF INDIVIDUAL DATA ERRORS ON A LINE EXCEEDING 
THE REQUESTED AMOUNT AND SETS THE APPROAIATE ERROR SUMMARr FLAG. IT 
THEN STOPS REPORTING ANY FURTHER ERRORS ON THAT LINE. ANf BMP COOES 
FOUND ARE SAVED ON THE BM? CODE QUEUE TO BE REPORTED LATER AND ANOTHER 
CHARACTER IS READ FROM THE RXFIFO. 



INPUTS: 



Rl - CONTAINS THE NUMBER OF THE UUT, 

R5 - LOU BYTE CONTAINS THE EXPECTED CHAR. 

ERCNT8 - ADDRESS OF THE BASE OF THE ERROR SUMMARY TABLE. 

ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE IN ERROR TABLE. 

ERRNBR - SET TO THE ERROR NUMBER OF THE FIRST ERROR IN THIS ROUTINE. 

EXOERR - ADDRESS OF "EXIT ON ERROR" FLAG. 



OUTPUTS: 



CARRY ■ 

ERCNTB 

ERRBLK 

ERSMRF 

EXOERR 



CLEAR IF RXFIFO UAS EMPTY. SET OTHERWISE. 

- CONTENTS UPDATED TO REFLECT THE CURRENT STATE. 

- CONTENTS MAY BE ALTERED. 

- ERROR SUMMitfJY FLAGS UPDATED. 

- 1 IF AT LEAST ONE ERROR OCCURED. 
0 IF NO ERRORS OCCURED. 



CM.LIMS SEQUENCE 
COmENTS: 



JSft 



PC. REPOER 



THIS ROUTINE REPORTS ERRORS UITH NUMBERS INITIAL ERR^ 
THRU INITIAL ERRNBR*1. 



SUBOROINATE ROUTINES CALLED: NONE 



004567 
005067 
012705 
000241 
017702 
100132 



012700 
040200 
001004 
004767 
005505 
001364 



010205 
042702 
120203 
001432 
012767 



166116 
000304 
000200 

164250 



170301 



000502 



REPOER:: SAVE 



21: 



I* 



CLR 
HOV 
CLC 
HOV 
BPL 



JSR RS.PRECOS iCALL REGISTER SAVE SUBRT. 

62t iCLEAR THE "AN ERROR OCCURED- INOICATaR. 

•126.. R5 iSET THE mx BMP READ COUNT. 

tCLEAR THE CARRY IN CASE T»C FIFO IS EMPTt. 
aReUFA.fl2 iREAO THE RXFIFO. 

61* (EXIT THIS SUBROUTINE WITH CARRY CLEAR IF FIFO EMPTt 



I CHECK IF THE CHARACTER IS A BMP CODE. 



t • 



177400 
000001 



I ♦ 

I 

i - 
41: 



000230 



NOV •170S01.ro iSET UP THE BIT MASK FOR A Brff> CODE. 

BIC R2.R0 I TRY AND CLEAR THE B^T MASK. 

BNE 41 (AVOID SAVING THE COOE IF IT IS NOT A BMP CODE. 

JSR PC.SAVBMP tSAVE THE BMP COOE ON THE QUEUE. 

DEC R5 I DECREMENT TK MAX BMP READ COUNT. 

BNE 21 iREAO ANOTHER CHARACTER FROM THE RXFIFO. 

VERIFY THAT THE READ CHARACTER IS CORRECT. 

MOV R2.R5 tSAVE T»C READ DATA. 

BIC ♦177400,R2 laEAR THE CLUTTER FROM THE DATA CHAR. 

CMPB R2.R5 iCOMPARE THE READ CHAR UITH THE EXPECTED ChAR. 

BEQ 61 I AVOID THE ERROR REPORT IF THE DATA IS CORRECT. 

MOV •l,62t (INDICATE AN ERROR HAS OCCL«tED. 



I 1*^ 



OL. r^L 




PART2 


3572 


016022 


010104 




5573 


016024 


006504 




5574 


016026 


056467 


002556 


5575 








5576 


016054 


001021 




5577 


016056 


010104 




5578 


016040 


110501 




5579 016042 


012705 


010120 


5580 








5561 


016046 


012767 


012276 


5502 


016054 








016054 


104460 




5585 


016056 


010401 




5584 


016060 


052767 


000100 


5585 


016066 


001004 




5586 


016070 


012767 


000001 


5587 


016076 


000462 




5588 








5589 








5590 








5591 








5592 


016100 


010502 




5595 


016102 


000502 




5594 


016104 


042702 


177760 


5595 


016110 


020201 




5596 


016112 


001455 




5597 


016114 


012767 


000001 


5598 


016122 


010104 




5599 016124 


006504 




5600 016126 


056467 


002556 


3601 








3602 


016154 


001022 




5605 


016156 


005267 


165710 


5604 


016142 


012705 


010165 


5605 








5606 


016146 


012767 


012170 


5607 


016154 








016154 


104460 




5608 


016156 


005567 


165670 


3G09 016162 


052767 


000100 


3610 


016170 


001004 




5611 


016172 


012767 


000001 


5612 016200 


000421 




5615 








3614 








3615 








3616 








5617 








5618 


016202 


005767 


164004 


3619 


016206 


001416 




1620 


016210 


005767 


000056 


3621 


016214 


001415 




5622 


016216 


010104 




5625 


016220 


006504 




5624 


016222 


005264 


002614 


5625 


016226 


026764 


165760 


3626 









200 



164556 



166002 

164122 
164154 



MAR 84 
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MOV 


R1,R4 


iCOPY THE LINE NUMBER. 


ASL 


R4 


iCONVERT THE LINE NUMBER TO AN OFFSET VALUE. 


BIT 


BITTBL(R4).ERSMRF ,TEST WHETHER ERROR SUMMARY REPORTING IS IN 






lEFFECT hOR THIS LINE. 


BNE 


61 


1 AVOID THE ERROR REPORT IF IT IS. 


MOV 


Rl .R4 


iPASS THE LINE NUMBER TO THE ERROR ROUTINE. 


MOVB 


R5.R1 


iPASS THE EXPECTED DATA CHAR. 


MOV 


4IEM6004,R5 


J PASS THE ERROR MESSAGE, 






1 "TXFIFO BAD. RECIEVED CHAR INCORRECT, ON LINE XX 


MOV 


MR6001.ERRBLK 


iSET UP THE ERROR REPORTING ROUTINE. 


ERROP 




iHtKOHI Int CHKUK . 






TRAP C»ERPOR 


MOV 


R4.R1 


1 RESTORE THE LINE NU»«ER. 


BIT 


MIT06,0PTI0N 


iHAS EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 


BNE 


6$ 


1 AVOID THE EXITING IF IT HAS. 


MOV 


^l.EXOERP 


1 INDICATE THAT THE TEST IS TO BE EXITED. 


BR 


60$ 


lEXIT THIS SUBROUTINE. 



NOW CHECK THAT THE LINE NUMBER OF THE DATA READ FROM THE RXFIFQ IS CORRECT. 



000130 
1644S6 

165702 

164020 
164052 



a - 

6$: MOV R't.R2 

SUAB R2 

BIC •177760. R2 

CMP R2.R1 

BEQ 8» 

MOV ♦1.62t 

MOV R1.R4 

ASL M 
BIT 

BNE 8t 

INC ERRNBR 

HOV «En6005.R5 

MOV «EftS901.ERftBLK 
ERROR 

DEC ERRNBR 

BIT «eiT06.0PTION 

BNE 8t 

MOV ♦l.EXOERR 

BR 60» 



{RESTORE T»C DATA READ FROM T»C RXFIFO. 
I PLACE T»C LINE NUMBER IN THE LOU BtTE. 
iCLEMR THE CLUTTER FROM T»C LINE NUr«ER. 
(COMPARE WITH THE EXPECTED LINE NUIflER. 
I AVOID THE ERROR REPORT IF T»C NUMBER IS CORRECT. 
{INDICATE THAT AT LEAST QIC ERROR HAS BEEN FOUND. 
I COPY T»C LI>C NU»«ER. 

I CONVERT THE Ll»€ NUIQER TO AN OFFSET VALUE. 
BITTBLCR4).ERSMRF iTEST MCTHER ERROR SUmARY REPORTING IS IN 
I EFFECT FOR THIS LINE. 
•AVOID T»C ERROR REPORT IF IT IS. 
I SET THE ERROR NUMBER TO INITIALS. 
I PASS THE MESSAGE. 

I "TXFIFO BAD. CHAR TRANSMITTED ON MONG LINE" 
i SET UP THE ERROR REPORTING ROUTHC. 
I REPORT THE ERROR. 

TRAP C«ERROR 
iSET THE ERROR NUMBER TO INITIAL. 
iHAS EXTEiCED ERROR REPORTING BEEN REQUESTED ? 
•AVOID SETTING THE -^XIT ON ERROR- FLAG IF IT HAS. 
• SET T»C FLAG. 
•EXIT THIS SUBROUTINE. 



TuPDATE THE ERROR COUNT IN T« ERROR SUNNARV TABLE IF NECESSARY. AM) UPDATE 
i T»C ERROR SUMMARY FLAGS IF NECESSARY, 
i - 
81: 



002614 



TST 


NDERPT 


•TEST IF SUMMARY REPORTING HAS BEEN REQUESTED. 


BEQ 


601 


•EXIT THIS SUBROUTINE IF IT HASNT. 


TST 


621 


•TEST IF AN ERROR HAS BEEN FOUND. 


BEQ 


60$ 


•EXIT THIS SUBROUTINE IF NO ERRORS. 


MOV 


R1.R4 


• COPY T^ LINE NUMBER. 


ASL 


R4 


• CONVERT T« LINE NUMBER TO AN OFFSET VALUE. 


INC 


ERCNTB(R4) 


•INCREMENT THE APPROPRIATE ERROR COUNT. 


CMP 


NDERPT. ERCNTB(R4) (COMPARE THE NUMBER OF ERRORS REPORTED WITH. 






(THE NUMBER REQUESTED. 



CZDHVBO OHU II ruNC TST PART2 MACRO M1200 
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3627 016234 

362d 

362^ 

5630 016236 
3631 

3632 016244 

3633 016246 
016246 

3634 016250 

3635 01625? 



101003 

056467 
000261 

004736 

000207 
000000 



002336 164346 



60$: 
61$i 



621: 
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BHI 
BIS 



SEC 
PASS 

RTS 
.WORD 



60$ 



I AVOID SETTING THE ERROR SOMMARr FLAG ir THE 
I NUMBER OF ERRORS REPORTED IS LESS THAN THE 
I NUMBER REQUESTED. 
BITTBLfR4).ERSMRr i OTHERWISE SET THE APPROIATE ERROR FLAG 



PC 
0 



I SET THE CARRY FLAG AND INDICATE SUCCESS. 
JSR PC.0(SP)* {RETURN TO PREG05 SU8RT. 

iSTRORAGE FOR THE AT LEAST ONE ERROR" INDICATOR, 



SEC <>9 



CZOHVBO DMl» U fUNC TST PART2 
GLOBAL SlORCKiTINE 



5657 

5658 

5659 

5640 

5641 

5642 

5645 

5644 

5645 

5646 

5647 

5648 

5649 

5650 

5651 

5652 

5655 

5654 

5655 

5656 

5657 

5658 

5659 

5660 

5661 

5662 

5665 016254 
016254 

5664 016260 

5665 016264 
3666 

3667 
3668 

3669 016266 

3670 

3671 

3672 

3673 

3674 016274 
016274 

3675 

3676 016276 
016276 

3677 016300 



MACRO m200 
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.SBTTL GLOBAL SUBROUTINE 



REPSMR 



- REPORT ERROR SUMMARY ROUTINE - 
THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAtfE 
EXCEEDED THE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 
IN A SINGLE TEST. THIS PARAMETER CAN BE SPECIFIEC BY THE OPERATOR IF 
HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS OPEHAroR IF 



* INPUTS: 



ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE 

ERRMSG - ADDRESS 0^ PRIMARY ERROR MESSAGE. 

I55NB2 - ERROR NW«ER OF ERRORS IN THIS ROUTINE. 

ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGST 



OUTPUTS! 



ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED) 
SiWARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE: 

CALLING SEQUENCE: 



JSR 



PC. REPSMR 



* COMMENTS: 



IF NO LINES HAVE EXCEEDED THE MAXIMUM NUTfiER OF INDIVIDUAL 
ERRORS TO REPORT. NO MESSAGES ARE PRINTEOBY THIS ROUTINE 
ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS: 
T»C CONTENTS OF ERRBLK ARE OESTROYEO. 



* SUBORDINATE ROUTINES CALLED: 



004567 165600 
005767 164326 
001404 



012767 013022 165562 



REPSMR:: SAVE 



TST 
BEQ 



ERSMRF 
601 



t ♦ 
i 



J SAVE CONTENTS OF GPRS RO T»«0 R5. 
'*5/f2EG05 |C<M.L REGISTER SAVE SOBRT. 

iC«CK THE -PRINT LINE ERROR SUmARY FLAGS. 
•EXIT MITMOUT ACTION IF NO SUMMARY FLAGS SET. 



UE HAVE SOME ERROR SUMMARIES TO REPORT. 

MOV «ER9004. ERRBLK i SELECT ERROR REPORTING ROUTINE. 
I REPORT 

t -ERROR SIWMARY REPORT FOR LINES MITM EXCESSIVE NUr«ERS OF ERRORS: 



104460 



004736 
000207 



601 1 



ERROR 

PASS 
RTS 



PC 



jRESTORE GPRS. 
JSR PC,»(SP)» 



TRAP C (ERROR 
(RETURN TO PREG05 SU6RT. 



CZOHVB^ QHU 11 fiMC TST PMftT2 
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MACRO M1200 
RESET T 



15 MAR 84 09:26 



PAGE 77 



SEO 101 



3679 
5680 
3681 
3682 
3683 
3684 
3685 
3686 
3687 
3688 
3689 
3690 
3691 
3692 
3693 
3694 
3695 
3696 
3697 
S698 
3699 
3700 
3701 
3702 
3703 
3704 

3705 
3706 
3707 
3708 
3709 
3710 
3711 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 
3723 
3724 
3725 
3726 
3727 
3728 
3729 
3730 
3731 
3732 
3733 
3734 



016302 
016302 
016306 



016312 
016316 
016320 
016322 
016324 
016330 
016334 



004567 165552 
012702 000040 



016704 163710 

030214 

001406 

005003 

012701 011610 
004767 176374 
103012 



016336 
016342 



016346 
016350 
016354 
016360 



010277 163664 
004767 000246 



005003 

012701 011610 
004767 176350 
103410 



SBTTL GLOBAL SUBROUTINE 



RESET T 



- RESET DEVICE UNDER TEST - 
THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 
IF RESET DOES NOT SUCCESFULLY COMPLETE, IF. TIME-OUT OCCURS. 
AN ABORT TEST ERROR MESSAGE IS REOORTED. 



THEN 



INPUTS: CSRA CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
ERRTBL- ERRTYP.FRNBR.AND ERRMSG SET UP CORRECTLY. 

OUTPUTS: THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOUN STATE. 

CARRY • CLEAR INDICATES THE TEST IS TO BE ABORTED. 

ERRBLK - VALUE MAY BE DESTROYED. 

lESTAT • TX AND RX INTERRUPT FLAGS ARE CLEARED. 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 

CALLING SEQUENCE: JSR PC.RESETT 

COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS UITH NUMBERS INITIAi. ERRNBR 
THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

SUBORDINATE ROUTINES CALLED: DELAY. MSLGET . 



RESETT:: SAVE 
MOV 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR RS.PREG05 tCALL REGISTER SAVE SUBRT, 

•6IT05.R2 I SET BIT MASK OF MASTER RESET BIT. 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 
IF MR IS SET THEN WAIT FOR SELF -TEST TO COMPLETE. 
IF TIME-OUr OCCURS. REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR. 



MOV 
BIT 

BEQ 
CLR 
MOV 

JSR 

8CC 



CSRA.R4 
R2.CR4) 
2t 
RS 

•5000.. Rl 
PC. MSLGET 
4$ 



iGET THE AOOKSS OF THE DUT'S CSR. 

I CHECK STATE OF MASTER RESET BIT. 

(DON'T DELAY IF MR IS ALREADY aEAR. 

iSET UP DESIRED STATE OF MASTER RESET BIT. 

iPASS TIMb-OUT Va.UE OF S SECONDS. 

jHAlT FOR SELF-TEST TO Ca»«>LETE. MR CLEAR. 

tGO REPORT ERROR IF TIMEOUT OCCURRED. 



CLEAR TX AND RX ENABLE BITS. ETC. 



SET MASTER RESET BIT IN CSR. 
SKIP T»C SELFTEST. 
TIME-OUT OF 5 SECS. JUST IN CASE T»€ SELF-TEST EXECUTES. 



21 



MOV 
JSR 



R2.SCSRA 
PC.SKPSTS 



tSET MASTER RESET BIT. DISABLE TX AND RX INTS. 
J TRY TO SKIP THE SELFTEST. 



SET SELF -TEST TIME-OUT OF 5 SECONDS. AND WAIT FOR M.R TO CLEAR. 

IF TIME-OUT OCCURS. THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABOR^ 

TEST INDICATOR. 



CLR 
MOV 
JSR 
BCS 



RS 

#5000. .Rl 
PC. MSLGET 
6$ 



« SET UP DESIRED STATE OF MASTER RESET BIT. 
{PASS TIME-OUT VALUE OF 5 SECONDS. 
lUAIT FOR SELF -TEST TO COMPLETE, MR aEAR. 
I SKIP ERROR REPORT IF MR aEARED IN TIME. 



CZOHVBO OHU II FUNC TST PART2 
GLOBAL SUBROUTINE 



5755 
5756 
5757 
5758 
5759 
5740 
5741 
5742 
3745 
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3744 
3745 
3746 
3747 
3748 
5749 
5750 
5751 
5752 
5755 

5754 
5755 
3756 



016562 
016566 



016574 
016574 
016576 
016400 



016402 
016406 

016410 
016410 

016412 



012701 005520 
012767 012020 



104460 
000241 
000405 



005067 163650 
000261 



004736 
000207 



165462 



; 

I - 
41 



SET UP ERROR MESSAGE TO REPORT "FATAL ERROR FOUND DURING RESET, TEST ABORTED' 
INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT. 



MOV 4>EM1601.R1 iPASS ERROR MESSAGE TO REPORT. 

MOV 4^R1603.ERRBLK ;PASS ADDRESS OF ERROR HANDLING ROUTINE. 

iREPORT ERROR "TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR" 
I "TEST ABORTED" 

ERROR I >>>>> ERROR <<<<< 

TRAP C TERROR 

CLC I INDICATE TEST IS TO BE ABORTED. 

BR 601 lEXlT THIS SUBROUTINE* ABORT TEST INDICATOR. 

TcLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN lESTAT. 
t EXIT WITH CONTINUE TEST INDICATOR SET (lE.CARR SET). 

6$: CLR lESTAT iCLEAR TX AND RX INTERRUPT STATUS FLAGS. 

SEC I INDICATE SUCCESS. CONTINUE TEST. 



601: 



PASS 



RTS 



PC 



jRESTORE GPRS. PASS THE FOLLOWING INTACT: 
JSR PC.OCSP)^ sRETURN TO PREG05 SUBRT. 

iCARRY BIT: IF CLEAR. INDICATES ABORT TEST. 



SEQ 10*- 



C2DHVB0 DHO II FUNC TST PARTS 
GLOBAL SUBROUTINE 



3758 
3759 
3760 
3761 
5762 
3763 
3764 
3765 
3766 
3767 
3768 
3769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 



no 
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. Rxieo - 



SEQ 10 ; 



3778 



3779 
3780 
3781 



3782 
3783 



016414 
016416 
016416 
016420 
016422 
016422 
016426 
016430 
016436 
016444 
016444 
016446 
016450 
016452 



010046 

104440 
010046 

012700 000340 
104441 

042767 137777 
016777 163614 

012600 
104441 

012600 
000207 



.SBTTL GLOBAL SUBROUTINE RXIEO 

- RECEIVER INTERRUPT DISABLE - 
THIS ROUTINE 13 USED TO DISABLE RECEIVER INTERRUPTS IN THE DHUll. 



INPUTS: NONE. 

OUTPUTS: THE RX.INT.ENBL BIT IS CLEARED IN THE DUT CSR. 

lESTST -CONTAINS THE UPDATED STATUS QF THE TX AND RX INTERRUPT 
ENABLE BITS. 



CALLING SEQUENCE; 



JSR 



PC. RXIEO 



COMMENTS? 
SUBORDINATE ROUTINES CALLED: NONE. 



THE CONTENTS OF TI^C INDIRECT ADDRESS REGISTER FIELD IN 
THE DUT CSR ARE DESTROYED. 



RXIEO: 



MOV 



RO.-CSP) 



163620 
163562 



GETPRI -CSP) 
SETPRI «PRI07 



BIC #137777. lESTAT 
MOV ICSTAT.8CSRA 
SETPRI CSP)» 



MOV 
RTS 



(SP)».RO 
PC 



I SAVE CONTENTS OF RO ON THE S^ACK. 

I SAVE PROCESSOR PRIORITY ON STACK. 

TRAP CIGPRI 

MOV RO, (SP) 

; IGNORE ANY INTERR'JPT THAT MAY BE GENERATED. 

MOV «PRI07.R0 

TRAP CISPRI 

•CLEAR RX.INT.ENBL BIT IN lESTAT. 

(DISABLE RX INTERRUPTS. 

{ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)*.RO 

TRAP C$SPRI 

iRESTORE RO. 



C20HV80 OHU-ll TUNC TST PART2 
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3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
3794 
3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3804 
3805 
3806 
3807 
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SEQ 104 



016454 052767 000100 

016462 042767 137677 

016470 016777 163562 

016476 000207 



163574 
163566 
163530 



SBTTL GLOBAL SUBROUTINE - RXIEl - 

« » 4*4***** ************** 

* - RECEIVER INTERRUPT ENABLE - 

* THIS ROUTINE IS USED TO ENABLE RECEIVER INTERRUPTS IN THE DHUll. 
* 

* INPUTS: NONE. 

* OUTPUTS: THE RX.INT.ENBL BIT IS SET IN THE OUT CSR. 

* lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

* ENABLE BITS. 
* 

* CALLING SEQUENCE: JSR PC. RXIEl 

* COMMENTS: THE CONTENTS OF THE IWIRECT ADDRESS REGISTER FIELD IN 

* THE OUT CSR ARE DESTROYED. 

* SUBORDINATE ROUTINES CALLED: NONE. 

- - *************************************************************************** 



RXIEl:: BIS MIT06.IESTAT 

BIC ♦137677.IESTAT 

MOV lESTAT.SCSRA 

RTS PC 



J SET RX.INT.ENBL BIT IN lESTAT. 

8 CLEAR ALL OTHER BITS, EXCEPT TX AND RX I.E. 

(ENABLE RX INTERRUPTS. 



C/0MV80 OHU II f\MC fSf 
CtOSAL ^«ROUTII« 

S«09 
5610 
50U 
i6l2 
9915 
5814 
5815 
5816 
581 r 
5818 
58l<» 
58?0 
5821 
S822 
5825 
5824 
5825 
5826 
5827 
5828 
5829 
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.S8TTL GLOBAL SUBROUTINE 



SCO tos 



SAV8MP 



• SAVE Bt9 CODES ROUTINE • 
THIS ROUTINE SAVES T»€ PMMNETER PASSED IN. ONTO T»C 9t9 CODE QUEUE 
TOCETICR WITH T»€ NUTTER OT THE CURRENTLY EXECUTING TEST. 

UMTS: R2 • CONTAINS THE DNP CODE THAT IS TO BE PLACED ON THE OUEUE. 

- CONTAINS ADDRESS OF NEXT LOCATION IN THE BHP QUEUE. 

- LABEL AT BASE OF THE BHP CODE QUEUE. 

- LABEL or NEXT LOCATION AFTER THE END OF THE BHP QUEUE. 
TSTNUH CONTAINS THE NUMBER OF THE CURRENT TEST. 

OUTPUTS: BTVCQP - INCREMENTED BY 4. 

THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 



CALLING SEQUENCE: 
COmENTS: 



JSR 



PC,SAVB»* 



IF THE OVERFLOW OCCURS THEN THE LAST LOCATION UILL BE 
OVERWRITTEN BV ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 



SUBORDINATE ROUTINES CALLED: NONE. 



5850 










56S1 










S6S2 01C500 






SAVBMP:: SAVE 


JSR 


016500 


004567 


165354 




5655 016504 


016704 


163700 


MOV 


BMPCQP.R4 


5634 016510 


116724 


163540 


MOVB 


TSTNUM.(R4)* 


5655 016514 


003204 




INC 


R4 


5656 016516 


042702 


177400 


BIC 


«1 77400. R2 


5657 016522 


010224 




MOV 


R2.(R4). 


5656 016524 


020427 


002612 


CMP 


R4.4BMPCQE 


5659 016550 


105402 




BLO 


21 


5840 016552 


162704 


000004 


SUB 


•4.R4 


5841 016536 


010467 


163646 


21: MOV 


R4.BMPCQP 


5642 










5643 016542 






601: PASS 


JSR 


016542 


004736 






5644 016544 


000207 




RTS 


PC 



iSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 I CALL REGISTER SAVE SUBRT. 

iGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 
I SAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
{INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 
I CLEAR THE UNWANTED BITS FROM THE BMP CODE. 
I SAVE THE BMP CODE ON THE QUEUE. 
iCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
I GO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 
iRESET THE POINTER TO THE LAST LOCATION IN QUE. 
I SAVE THE POINTER. 



•RESTORE GPRS. 
PC,»(SP)» 



I RE TURN TO PREGOS SUBRI 



IC TbT PART? 



3646 
584 7 
S648 
SS49 

3650 
5S51 
5852 
5853 
3854 
3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3863 
3864 
3865 

3866 
5867 
5868 
5869 
3870 
5871 
3872 
5875 
5874 
5875 

5876 



016546 
016546 
016552 
016556 
016560 
016564 
016570 
016574 
016600 
016604 

016610 
016610 
016612 



004567 
004767 
010005 
012700 
004767 
012700 
004767 
012704 
004767 



004756 
000207 
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:>fa 106 



165506 
176072 

000206 
000762 
177670 
001002 
000012 
175452 



SETPAR 



• SET TX AND CONTROL PARAMETERS - 
THIS SUROUTINE IS USED IN T»€ TIHAVL.TST. 
IT INITIALISES THE SELECTED LINE TO THE rOLLOUiNC STATE: 
INTERNAL LOOPBACK. lAUTO ENABLED. LPR:S8.4K. 8 BITS/CHAR. 2 STOP. 
ODD PARITY. 

I»tf>UTS: Rl - CONTAINS NUMBER OF THE LINE TO BE INITIALISED. 

OUTPUTS: LNCTRL AND LPR REGISTERS TOR THE SELECTED LINE ARE OESTROTED. 

CALLING SEQUENCE: JSR PC. SETPAR 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: DELAY.UTULNC.UTM.PR. 



SETPAR:: SAVE 

JSR 
MOV 
MOV 

JSR 
MOV 

JSR 
MOV 

JSR 



JSR 
PC.LINBIT 
R0,R5 
♦206.ro 
PC.UTULNC 
♦177670.ro 
PC.UTULPR 
♦10.. R4 
PC. DEL AY 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SUBRT. 

iGET A BIT MAP FOR THIS LINE. 
iCOPY THE LINE BIT MAP. 

I PASS INTERNAL LOPBCK. ENABLE RX AND tAuTO. 

lINITILAISE THE LINE CONTROL REGISTER. 

I PASS THE LPR CONTENTS. 

I SET THE LPR CONTENTS TO 38. 4K BAUD. 

I PASS DELAY TIME OF 10 MILL I SECONDS. 

lUAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 



60«: 



PASS 
RTS 



PC 



JSR 



iRESTORE GPRS. 
PC.8C3P). 



•RETURN TO PREGOS SUBRT. 



TbT PART2 MAl 
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38 78 
3879 
3880 
3861 
3662 
3683 
3684 
3665 
3666 
3687 
3666 
3669 
3690 
3691 
3892 
3693 
3694 
3695 
3896 
3697 
3698 

3699 
3900 
3901 
3902 
3905 
3904 
3905 
3906 
3907 
3906 
3909 
3910 
3911 
3912 
3913 
3914 
3915 
3916 
3917 

3916 



016614 
016614 
016620 
016624 



016634 
016640 
016642 
016646 
016650 
C 16652 
016656 
016660 
016664 

016666 
016666 
016670 



004567 
012704 
004767 



165240 
000012 
175432 



016630 012701 000060 



012703 
005301 
016704 
010124 
010324 
020467 
103774 
032701 
001365 



004736 
000207 



052525 
165360 

163366 
000017 



.SBTTL GLOBAL SUBROUTINE 



SKPSTS 



- SKIP SELFTEST ROUTINE - 
THIS SUBROUTINE IS USED TO SKIP THE SEL^TEST AFTER A OUT RESET MAS BtEN 
INITIATED. IT MUST BE ENTERED IMMEDIATELT AFTER SETTING THE OUT MASTER 
RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 
CONSIDERATIONS). 

INPUTS: CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

TXBFCA - CONTAINS ADDRESS OF DUT DHA BUFFER COUNT REGISTER. 

OUTPUTS: SKIP SELFTEST CODES ARE URITTEN TO THE OUT REGISTERS. 

CALLING SEQUENCE: JSR PC. SKPSTS 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: DELAY. 



SKPSTS:: SAVE 

MOV 
JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 tCALL REGISTER SAVE SUBRT. 

#10. .R4 tPASS DELAY VALUE OF 10 MILL I -SECONDS. 

PC, DELAY lOELAY FOR 10 MILLI -SECONDS. 



t - 



URITE SKIP SELF. TEST CODE (52525) TO ALL THE INDEXED OUT REGISTERS. 

MOV #NUMLNS!BIT05,R1 tFORTi IND.AOR.REG FIELD (PLUS M.R. BIT) WORD. 
I THE ABOVE INaUSION OF THE M.R. BIT IS ICCESSARY BECAUSE OF THE 
I LACK OF A M.R. BIT URITE LXK-OUT ON THE OHU-ll. 



4»: 

61: 

60* : 



MOV 
DEC 
MOV 
MOV 
MOV 
CMP 
BLO 
BIT 



#52S2S.R5 
Rl 

CSRA.R4 
R1.(R4)* 
R5.(R4)» 
R4. TXBFCA 
6» 

•17. Rl 
4» 



t INITIALISE THE SKIP SELF -TEST COOC. 
•SELECT THE NEXT SET OF DEVICE REGISTERS. 
iGET THE ADDRESS OF THE CSR OF THE OUT. 
(SELECT A BANC OF OUT REGISTERS. 
I URITE THE CODE TO A OUT REGISTER. 
tCOMPARE POINTER UITH LAST REGISTER ADDRESS. 
(LOOP IF NOT ALL REGS DONE IN THIS BAM(. 
tTEST FOR IND.AOR.REG FIELD DECREMENTED TO 0. 
(LOOP UNTIL ALL REGISTERS CONTAIN T»C CODE. 



PASS 
RTS 



PC 



JSR 



(RESTORE GPRS. 

PC.e(SP)» 



(RETURN TO PREG05 SUBRT. 



CZ0hV30 OHO II TUNC TST PART2 
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3920 
3921 
3922 
3923 
3924 
3925 
3926 
3927 
3928 
3929 
3930 
3931 
3932 
39S3 
3934 
3935 
3936 
3937 
3936 
3939 
3940 



MA^RI 



M|200 



15 HAR 64 09:28 PAGE 83 
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SBTTL 



GLOBAL SUBROUTINE 



TSA6RT 



- TEST ABORT ROUTINE - 
THIS SUBROUTINE IS USED WHEN A NON-TEST RELATED ERROR HAS BEEN FOUND 
DURING THE EXECJTION OF THE CURRENT TEST. 

IT IS USED TO INFORH THE OPERATOR THAT THE CURRENT TEST HAS BEEN 
ABORTED. 

INPUTS: ERRMSG - CONTAINS THE NAME OF THE CURRENT TEST. 

ERRNBR - CONTAINS THE CORRECT ERROR NUMBER. 

THE REMAINDER OF THE ERRTB*. IS CORRECTLY INITIALISED. 

OUTPUTS: MESSAGES ARE REPORTED TO THE OPERATOR. 

CALLING SEQUENCE: JSR PC.TSABRT 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: ER1605. 



5941 


016672 
016672 


004567 


165162 




TSA8RT: 


: SAVE 


^942 


016676 


012701 


016714 






HOV 


3943 


016T02 


012767 


012020 


165146 




MOV 


3944 


016710 
016710 


104460 








ERROR 


3945 


016712 


000432 








BR 


3946 


016714 


040 


116 


117 


21: 


.ASCXZ 




016717 


116 


055 


122 








016722 


105 


114 


101 








016725 


124 


105 


104 








016730 


040 


124 


105 








016733 


123 


124 


040 








016736 


105 


122 


122 








016741 


117 


122 


040 








016744 


106 


117 


125 








016747 


116 


104 


040 








016752 


104 


125 


122 








016755 


111 


116 


107 








016760 


040 


124 


105 








016763 


123 


124 


040 








016766 


105 


150 


105 








016771 


103 


125 


124 








016774 


111 


117 


116 








016777 


000 










3947 










.EVEN 




3948 


017000 
017000 


004736 






60S: 


PASS 


3949 017002 


000207 








RTS 



JSR 

•2t.Rl 

«ER160S.ERReLK 



601 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 I CALL REGISTER SAVE SU8RT. 

iPASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 
tSETUP THE ERROR REPORTING ROUTINE, 
t >>>>> ERROR <<<««. 

TRAP CIERROR 



/ NQN-RELATEO TEST EMIOR FOUND DURING TEST EXECUTION/ 



PC 



iRESTORE GPRS. 
JSR PC.BCSP)* 



(RETURN TO PREG05 SUBRT. 



SEO 109 



5951 
5952 
5955 
5954 
5955 
5956 
5957 
5958 
5959 
5960 
5961 
5962 
5965 
5964 
3965 
5966 
5967 
5968 
5969 
5970 
5971 

5972 
5975 
5974 
5975 

5976 



017004 

017004 004567 165050 

017010 010005 

017012 012702 002650 

017016 004767 175556 
017022 

017022 004756 

017024 000207 



.SBTTL GLOBAL SUBROUTINE . TXQATP 



, ,^ - TRANSMIT DATA PATTERN - 

THIS SUBROUTINE IS USED IN THE FlhAVL.TST. 

IT TRANSMITS A SPECIFIED NUMBER OF DATA BYTES ON THE SPECIFIED LINE, 

RO - CONTAINS THE NUMBER OF DATA BYTES TO TX 

^ »*<ICH TRANSMISSION IS TO TAKE PLACE 
BUFBAS TO BUFMID CONTAINS A 256 BYTE DATA PATTERN, 

DATA IS SENT OUT ON THE SPECIFIED LINE. 
CARRY SET - TX SUCCESSFUL. 

TXDATP 



* 
* 
* 

* INPUTS: 
* 

* OUTPUTS 
* 

« CALLING SEQUENCE: 
* 

* COMMENTS: 
* 

« SieORDINATE ROUTINES CALLED: DOOHA. 



TXDATP:; SAVE 



601: 



H0«/ 
MOV 
JSR 
PASS 

RTS 



JSR 

R0.R5 
«BUFBAS.R2 
PC. DOOHA 



PC 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
**5i??^9S5 — »CALL REGISTER SAVE SUBRT. 
I PASS THE NUMBER QF CHARS TO TX. 

fl*"^ °^ 0*TA PATTERN TO TX. 
t TRANSMIT THE DATA PATTERN. 
{RESTORE GPRS. 

**C.B(SP)» {RETURN TO PREG05 SUBRT. 



CZ0HV8O OHU 11 ruNC TbT PrtRT2 
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39-'e 
5979 
3980 
3981 
5982 
5985 
5984 
3985 
5986 
5987 
3988 
3989 
5990 
3991 
3992 
5993 
3994 
3995 
3996 
5997 
3998 
3999 
4000 
4001 
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rxosBL 
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SEQ 110 



4002 
4003 
4004 
4005 
4006 
4007 
400S 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4016 
4019 
4020 
4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 



4029 
4030 



017026 
017026 
017032 
017034 
017040 
017044 
017046 
017052 
017056 



017060 
017064 
017066 
017070 



017072 
017074 
017076 
017102 
017104 
017106 
017110 

017112 
017112 
017116 



004567 
010500 
012701 
016702 
005202 
012703 
016704 
005005 



010477 

105712 
100001 
050105 



030100 
001402 
142712 
005204 
006301 
005303 
001363 



010566 
004736 



165026 

000001 
163176 

000020 
163200 



163142 



000200 



000014 



.SBTTL GLOBAL SUBROUTINE 



- TXDSBL 



- TRANSMITTER DISABLE - 
THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES Br. 
CLEARING THE ASSOCIATED TX. ENABLE BIT ON THE DUT. 



INPUTS: 



OUTPUTS: 



R5 • BIT'S SET CORRESPOND TO LINES ON UHICH TO CLEAR TX. ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

lESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE HAXIMUH NUMBER OF LINFS AVAILABLE. 
TXAD2A • CONTAINS THE ADDRESS OF THE TBUFFA02 REGISTER. 

R5 - BIT'S SET INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS. 

rBUFFA02 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 

THE CONTENTS OF THE IND.AOD.REG FIELD IN THE CSR ARE DESTROYED. 



JSR 



PC.TXOSBL 



CALLING SEQUENCE: 
COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



TXDSBL:: SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 



I SAVE CONTENTS OF GPRS RO THRU RS. 

JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

R5.R0 (COPY BIT HAP OF LINES TO DISABLE TRANSniSSION. 

•eiTO.Rl t INITIALIZE T»C SELECTED LINE SIT MASK. 

TXA02A.R2 tGET THE ADDRESS OF THE TBUFFA02 REGISTER. 

R2 tGET THE ADDRESS QF T»C nSBYTE OF TBUFFA02 REG. 

•NUMLNS. RS iGET NAXIHUM LINE NUMBER PLUS ONE. 

IESTAT.R4 iGET THE STATES QF T»C INT ENABLE BITS. 

RS iLOC POSSIBLE TX DISABLED ON ALL LUCS. 



I ♦ 

I 
I - 
2«: 



SELECT EVERY LINE IN TURN. AND LOG THE STATE OF EACH TX. ENABLE BIT. 



MOV 
TST8 
BPL 
BIS 



R4.aCSRA 

<R2) 

4t 

R1.R5 



tURITE TO OUT CSR TO SELECT LitC REGISTERS. 
tCHECK STATE OF TX .ENABLE BIT ON SELECTED LINE. 
tSKIP NEXT INSTRUCTION IF TX. ENABLE CLEAR. 
iLOG TX ENWLE BIT SET FOR SELECTED LDC. 



V CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPQMIING BIT SET IN THE TX DISABLE 
I LINE BIT NAP. 



t - 
4f: 



6t: 



60t: 



017120 000207 



BIT 

6EQ 
BICB 
INC 
ASL 
DEC 

BNE 

PASS 



RTS 



Rl.RO (CHECK STATE OF DISABLE LINE BIT MAP. 

61 iBRANCM IF THIS LINE TO REMAIN UNALTERED. 

•BIT7.CR2) tCLEAR TX.ENABLE BIT ON SELECTED LINE. 

R4 {PREPARE TO SELECT REGISTERS FOR ICXT LINE. 

Rl t SHIFT BIT HAP FQR NEXT LDC. 

RS t DECREMENT LINE NUMBER. 

2» iLOOP TO CHECK NEXT lFiC. 

•RESTORE GPRS. EXCEPT 
MOV RS.RSSLOT(SP) »PUT RS IN STACK SLOT. 

JSR PC.aCSP)* iRETURN TO PREG05 SUBRT. 

|R5 • PREVIOUS STATES OF ALL TX.ENABLE BITS. 



RS 



PC 
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4032 
4033 
4034 
4035 
4036 
403'' 
4038 
4039 
4040 
4041 
4042 
4043 
4044 
4045 
4046 
4047 
4040 
4049 
4050 
40S1 
4052 
4053 
4054 
4055 
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SEQ 111 



4056 
4057 
4058 
4059 
4060 
4061 
4062 
4065 
4064 
4065 
4066 
4067 
4068 
4069 
4070 
4071 
4072 
4075 
4074 
4075 
4076 
4077 
4078 
4079 
4080 
4081 
4082 



4083 
4084 
4085 



017122 

017122 004567 

017126 010500 

017130 012701 

017134 016702 

017140 005202 

017142 012703 

017146 016704 

017152 005005 



017154 010477 

017160 105712 

017162 100401 

017164 050105 



164732 

000001 
163102 

000020 
163104 



163046 



017166 050100 

017170 001402 

017172 152712 000200 

017176 005204 

017200 006501 

017202 005505 

017204 001363 

017206 

017206 010566 000014 

017212 004736 



017214 000207 



.SBTTL GLOBAL SUBROUTINE 



TXENBL 



- TRANSMITTER ENABLE - 
TH13 SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES BY 
SETTING THE ASSOCIATED TX. ENABLE BIT ON THE OUT. 

INPUTS: R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO SET TX. ENABLE. 

CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

lESTAT - CONTAINS THE STATE Of TXIE AND RXIE BITS IN THE CSR. 
NUnLNS - EQUATED TO BE THE HAXIHUH NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS Of THE TBUTFAO? REGISTER. 

OUTPUTS: RS - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 

TBUTFAOZ • THE STATE Of THE TX.EN8LE BIT MAY BE ALTERED. 

THE CONTENTS Of THE IND.ADO.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 



JSR 



PC. TXENBL 



COHNENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



TXENBL:: SAVE 

HOV 
NOV 
HOV 
INC 
NOV 
HOV 
CLR 



JSR 

R5.R0 
ieiTO.Rl 
TXAD2A.R2 
R2 

•NUNLNS. RS 

IESTAT.R4 

R5 



iSAVE CONTENTS OF GPRS RO T^ R5. 

RS.PREG05 tCALL REGISTER SAVE SUBRT. 

iCOPT BIT NAP OF LINES TO ENABLE. 

iINITIALIZC THE SELECTED LINE BIT NASK. 

iGET T»C ADDRESS OF THE TBUFFA02 REGISTER. 

I GET TIC ROORESS OF THE NSByTE OF TBUFFA02 REG. 

iGET tWXINUN LIIC NUTSER. 

tGET TIC STATES OF THE INT ENABLE BITS. 

laEAR TX. ENABLE BIT LOG OF DISABLED LI^ES. 



TsELECT EVERY LINE IN TURN, AMD LOG ANY TX.ENBLE BIT THAT IS CLEAR. 

2»: NOV R4.BCSRA iMRITE TO DUT CSR TO SELECT LUC REGISTERS. 

TSTB (R2) iOCCK STATE OF TX. ENABLE BIT ON SELECTED LINE. 

BNI «• iSKIP ICXT INSTRUCTION IF TX. ENABLE SET. 

BIS Rl.RS iLOG TX ENABLE BIT CLERR FOR SELECTED LINE. 



i ' 
I 
I 

4»: 

61: 

601: 



SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 
LINE BIT HAP. 



BIT 

BEQ 
BISB 
INC 
ASL 
DEC 

BNE 

PASS 



RTS 



Rl.RO 
6t 

•BIT7.CR2) 

R4 

Rl 

RS 

21 



R5 



PC 



MOV 
JSR 



I CHECK STATE or TX.ENABLE LINE BIT 
iBRRNCH IF THIS LINE TO REMAIN UNALTERED. 
{ENABLE TRANSMISSION ON SELECTED LifC. 
•PREPARE TO SELECT REGISTERS FOR tCXT LINE. 
ISHIFT BIT HAP FOR NEXT LINE. 
I DECREMENT LINE NUHKR. 
(LOOP TO CHECK NEXT LINE. 

{RESTORE GPRS. EXCEPT 

R5.R5SL0T(SP) |PUT R5 IN STACK SlOT. 

PC.S(SP)* (RETURN TO PREG05 SlORT. 

|RS - LINE BIT NAP CORRESPONDING TO THE 
t PREVIOUS LINES THAT WERE DISABLED. 
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4087 
4066 
4069 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4096 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 



4107 



4108 
4109 
4110 



4111 
4112 



017216 
017220 
017220 
017222 
017224 
017224 
017230 
017232 
017240 
017246 
017246 
017250 
017252 
017254 



010046 

104440 
010046 

012700 000S40 
104441 

042767 177677 
016777 163012 

012600 
104441 

012600 
000207 
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SEQ 112 



TXIEO 



• TRANSMITTER INTERRUPT DISABLE - 

* THIS ROUTINE Ii USED TO DISABLE TRANSMITTER INTERRL^PTS IN THE DHUll. 

• INPUTS: NONE. 
* 

• OUTPUTS: THE TX.INT.ENBL BIT IS CLEARED IN THE OUT CSR. 

« lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

« ENABLE BITS. 

* CALLING SEQUENCE: 

* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

♦ THE OUT CSR ARE DESTROrEO. 
♦ 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



JSR 



PC. TXIEO 



TXIEO:: MOV 

GETPRI 



RO.-CSP) 
•CSP) 



163016 
162760 



SETPRI #PRI07 



BIC #177677. lESTAT 
MOV lESTAT.aCSRA 
SETPRI CSP)* 



MOV 
RTS 



(SP)-.RO 
PC 



sSAVE CONTENTS OF RO ON THE STACK. 

iSAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 

TRAP CIGPRI 
MOV RO. CSP) 

I IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 

MOV #PRI07.R0 
TRAP CiSPRI 

iCLEAR TX.INT,ENBL BIT IN lESTAT. 

iDISABLE TX INTERRUPTS. 

I ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)*.RO 
TRAP CSSPRI 

iRESTORE RO. 



CZOMVBO DHli U TUNC TbT PARTS 
GLOBAL SceROUTINE 



4114 

4115 

4116 

4117 

4118 

4119 

4120 

4121 

4122 

4123 

4124 

4125 

4126 

4127 

4126 

4129 

4130 

4131 

4132 

4133 

4134 

4135 

4136 
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.SBTTL GLOBAL SieROUTINE TXIEl 



- TRANSMITTER INTERRUPT ENABLE 
THIS ROUTINE IS USED TO ENABLE TRANSMITTER INTERRUPTS IN THE DMUll. 

NONE • 

THE TX.INT.ENBL BIT IS SET IN THE OUT CSR. 

ENABLE BITs!*^**^ iPOATEO STATUS OF THE TX AND RX INTERRUPT 



♦ INPUTS: 

♦ OUTPUTS 

• CALLING SEQUENCE: 

: C»«N,S= TH| CONTENTS^ TH|^INDgEC, «0«SS «C.St£« ri£.0 IN 

* 

* SUBORDINATE ROUTINES CALLED: NONE. 



JSR 



PC. TXIEl 



017256 052767 040000 

017264 042767 137677 

017272 016777 162760 

017300 000207 



162772 
162764 
162726 



TXIEl:: BIS tBITU . lESTAT 

BIC •157677. lESTAT 

MOV IESTAT.8CSRA 

RTS PC 



iSET TX.INT.ENBL BIT IN lESTAT. 
iCLEAR ALL BITS EXCEPT TX RX I.E BITS. 
•ENABLE TX INTERRUPTS. 



CZ0HV8O DMU II TUNC TST PART2 
GLOBAL S(.eR0OTINE 



41S8 
4159 
4140 
4141 
4142 
4145 
4144 
4145 
4146 
4147 
4146 
4149 
4150 
4151 
4152 
4155 
4154 
4155 
4156 
4157 
4156 
4159 
4160 
4161 



MACRO nt200 
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SEQ 114 



4162 
4163 
4164 
4165 
4166 
4167 
4166 
4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
4182 
4183 
4184 
4185 
4186 
4187 
4188 
4189 
4190 
4191 
4192 
4193 



017302 

017302 004567 164552 



017306 010204 

017310 160104 

017312 103403 

017314 012701 177777 

017320 000442 



017322 005004 

017324 000241 

017326 006001 

017330 006004 

017332 012700 000020 



017336 010246 

017340 010346 

017342 160403 

017344 005602 

017346 103402 

0173SO 160102 

017352 103003 



017354 012603 
017356 012602 



SBTTL GLOBAL SUBROUTINE 



UNSOIV 



- UNSIGNED DIVIDE ROUTINE - 
THIS SUBROUTINE IS USED TO DIVIDE A 32 SIT UNSIGNED DIVIDEND BY A 
16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 
CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 
THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 

INPUTS: Rl - THE DIVISOR. UNSIGNED, 16 BITS. 

R2 - MOST SIGNIFICANT UORO OF THE DIVIDEND. UNSIGNED. 16 BITS. 
R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED. 16 BITS. 

OUTPUTS: Rl - QUOTIENT. UNSIGNED. 16 BITS (177777 IF OVERFLOW). 

CARRY - SUCCESS FLAG. SET IF COMPLETE QUOTIENT FITS IN 16 BIT?. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. UNSOIV 



IF THE DIVISOR IS 0 THE QUOTIENT IS RETURNED AS ALL ONES 
(177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 



SUBORDINATE ROUTINES CALLED: NONE. 



UNSOIV:: SAVE 



i ♦ 



tSAVE CONTENTS OF GPRS RO THRU R5. 
JSR RS.PREG05 iCALL REGISTER SAVE SU8RT. 



t CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION 

* MOV R2.R4 

SUB R1.R4 

BCS 2t 

MOV t-l.Rl 

BR 60> 



iGET MSU OF OIVIOEM) FOR SUBTRACT. 
} SUBTRACT DIVISOR FRQN HSU OF DIVIOEM). 
tir IT DIDN'T GO. UE HAVE OUOTIENT < 16 BITS. 
(SET OUOTIENT TO ALL OICS C177777). 
tEXIT UITH CARRY CLEAR. 



I • 

; SET 
I - 
2>: 



I* 

t THE 
i - 
4*: 



UP COUNTERS AND VARIOUS UORKING GPRS. 



CLR 
CLC 
ROR 
ROR 
MOV 



R4 

Rl 
R4 

•16. .RO 



SUBTRACT AM) SHIFT LOOR. 



MOV 
MOV 
SUB 
SBC 
BCS 
SUB 
BCC 



R2.-(SP) 

R5.-(SP) 

R4.R5 

R2 

61 

R1.R2 
8« 



6«: 



|*IT DIDN'T GO. SO UE SHIFT 
I CARRY IS SET. 

*' MOV (SP)».R3 
MOV CSP)*.R2 



tCLEAR THE LSU OF nC DIVISOR. 

{CLEAR CARRY FOR T»C SHIFT OF T»C DIVISOR. 

t DIVISOR BY 

I 2(UNSIGNB» 

tSET UP INITIAL SHIFT COUNT TO 16. 



I SAVE nSUORD OF DIVIDEND. 

I SAVE LSUORD OF DIVIDEND. 

tLStiORD DIVIDEND - LSUORD OF DIVISOR. 

iNSUORO DIVIDEND - BORROU . 

I IF BORROU FROM BORROU SUBTRACT. IT DIDN'T GO. 
tHSUORD DIVIOEM) • MSUQRD OF DIVISOR. 
tIF NO BORROU. IT UENT. CARRY IS CLEAR. 

A 1 INTO THE QUOTIENT (COMPLEMENTED LATER). 



iRESTORE LSUORD OF DIVIDEND. 
{RESTORE MSUORD OF DIVIDEND. 



CZOHVBO DHU II TUNC TbT PARTS 
GLOBAL SUBROUTINE 



MACRO M1200 
UNSOIV 



IS MAR 84 09:28 



PAGE 89-1 



SEQ lis 



4194 
419S 
4196 
4197 
4198 
4199 
4200 
4201 
4202 
4203 
4204 
4205 
4206 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 
4216 
4217 
4216 
4219 
4220 
4221 
4222 
4223 
4224 
4225 
4226 
4227 
4226 
4229 
4230 



4231 
4232 



017360 000401 



017362 012626 



017364 
017366 
017370 
017372 
017374 
017376 
017400 



017402 
017404 
017406 
017410 
017412 



017414 
017416 
017420 



017422 
017424 

017426 
017426 
017432 



006105 
000241 
006001 
006004 
005300 
001357 
005105 



000241 
006103 
103402 
160403 
103403 



005205 
001001 
005305 



010501 
000261 



BR 



10 < 



iGOTO SHIFT 1 INTO THE QUOTIENT. 



81; 



010166 000004 
004736 



i ♦ 

I 
i 

; ♦ 



IT WENT, SO WE RESTORE THE STACK AND SHIFT A 0 INTO QUOTIENT (WILL BE 
COMPLEMENTED LATER). CARRY IS CLEAR. 



MOV 



(SP)».(SP)» 



iPOP THE SAVED DIVIDEND OFF OF THE STACK. 



SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 



10>: 



ROL 
CLC 
ROR 
ROR 
DEC 
BNE 
COM 



R5 

Rl 
R4 
RO 
41 
R5 



I SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 

I DIVIDE THE 

i DEVISOR BY 

I 2 (UNSIGNED). 

t COUNT THIS SHIFT AND SUBTRACT. 

I LOOP FOR ANOTHER SHIFT 6 SUB IF NOT DONE. 

I GET QUOTIENT FROM INVERTED QUOTIENT. 



NQU UE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



t - 



t * 



CLC 
ROL 
BCS 
SUB 
BCS 



RS 
121 
R4.RS 
14 » 



t ROUND UP. EXTRA SUBTRACT UENT. 
INC 



; - 

12$: 



R5 
14 » 

DEC R5 



iCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
{MULTIPLY LSUORD OF DIVIDEND BY 2. MSUORD IS 0. 
(IF CARRY FROM SHIFT. ROUND UP. 
(SUBTRACT DIVISOR FROM DIVIDEND. 
ilF BORROW. DON'T ROUND UP. 



I INCREMENT THE QUOTIENT BY ONE. 

tIF NO OVERFLOW. WE LEAVE THE ROUND UP. 

lOON'T LET ROUNDING CAUSE OVERFLOW. 



!*ALL DONE. PASS QUOTIENT AND EXIT 

14t: MOV R5.R1 
SEC 



(PASS QUOTIENT BACK IN Rl. 
{INDICATE NO OVERFLOW. 



017434 000207 



60t: PASS Rl {RESTORE GPRS. LEAVE THE FOLLOWING INTACT: 

MOV Rl.RlSLOTCSP) {PUT Rl IN STACK SLOT. 

JSR PC.8CSP)* {RETURN TO PREG05 SUBRT. 

(Rl • 16 BIT. UNSIGNED QUOTIENT. 
RTS PC I CARRY - SET INDICATES NO OVERFLOW C SUCCESS). 
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SEQ 116 



4234 
4235 
4236 
4237 
4238 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
4247 
4246 
4249 
4250 
4251 
4252 
4253 
4254 
4255 
4256 
4257 
4258 
4259 
4260 
4261 



4262 


017436 








017436 


004567 


164416 


4263 


017442 


010204 




4264 


017444 


010102 




4265 


017446 


042701 


170000 


4266 


017452 


042702 


007777 


4267 


017456 


000302 




4268 


017460 


006202 




4269 


017462 


006202 




4270 


017464 


006202 




4271 


017466 


016202 


002336 


4272 


017472 


010203 




4273 


017474 


004767 


175230 


4274 








4275 


017500 


010002 




4276 


017502 








017502 


010266 


000006 




017506 


004736 




4277 








4276 


017510 


000207 





.SBTTL GLOBAL SUBROUTINE 



- UAIBIS 



* - WAIT FOR BIT SET ROUTINE - 

• THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME SET. IF THE 

• SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME OUT 

• PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE. 

* THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 

* ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 



• INPUTS: 



OUTPUTS: 



Rl - TIME-OUT VALUE AND BIT NUMBER INDICATION: 

BITS 15 THRU 12 - NUMBER OF BIT TO TEST (RANGE 0 THRU 15). 
BITS 11 THRU 0 - TIME-OUT VALUE IN MILLI -SECONDS (4095 MAX). 

R2 - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 
MSLCNT. 

R2 - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OUT). 



CALLING SEQUENCE: 



MOV 

MOV 
JSR 



«130040.R1 

«tABEL.R2 
PC. UAIBIS 



;PASS BIT 11 (13 OCTAL) AND 
J 32 (40 OCTAL) MS DELAY. 
sTEST BIT IN WORD AT "LABEL". 
sWAIT 32 MS FOR BIT 11 TO SET. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: MSLGET. 



UAieiS:: SAVE 

MOV 
HOV 
BIG 
BIC 
SUAB 
ASR 
ASR 
ASR 
MOV 
MOV 
JSR 



JSR 

R2.R4 

R1.R2 

•1 70000. Rl 

#7777. R2 

R2 

R2 

R2 

R2 

BITT8L(R2).R2 

R2.R3 

PC.HSLGET 



60»: 



MOV 
PASS 



RTS 



R0.R2 
R2 



PC 



MOV 
JSR 



I SAVE CONTENTS OF GPRS RO THRU RS. 
R5.PREG05 tCALL REGISTER SAVE SUBRT. 

I SET UP THE MM)RESS PARAMETER FOR MSLGET. 

tSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
tSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
tPUT LINE NUMBER FIELD IN LSBYTE. 
t SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
t POSITION TO USE IT AS A WORD TABLE OFFSET 
I FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
iGET BIT MAP OF LIKE TO TEST FROM TABLE. 
I INDICATE THAT THE BIT SHOULD BE SET. 
I WAIT FOR THE BIT TO BE SET WITHIN TIME OUT. 
i CARRY IS CORRECT UPON MSLGET RETURN. 
I PASS LAST VALUE («A0 AS OUTPUT PARAMETER. 
I RESTORE GPRS, EXCEPT T»C FOLLOWING: 
R2.R2SL0T(SP) ;PUT R2 IN STACK SLOT. 

PC.a(SP)» jRETURN TO PREG05 SUBRT. 

t R2 - LAST VALUE READ LOOKING FOR CONDITION. 
; CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 



CZ0HV80 OHU 11 FUNC TST PART 2 
GLOBAL SUBROUTINE 



4280 
4281 
4282 
4283 
4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 
4292 
4295 
4294 
4295 
4296 
4297 
4298 
4299 
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SEQ 117 



4300 
4301 
4302 
4303 
4304 
4305 
4306 
4307 
4308 

4309 
4310 



017512 
017512 
017516 
017522 
017526 
017532 
017534 
017540 
017544 

017546 
017546 

017550 



004567 
012701 
016702 
004767 
103005 
012704 
004767 
000261 



004736 
000207 



164342 
170536 
162500 
177704 

000005 
174516 



.SBTTL GLOBAL SUBROUTINE UAITTX 

- WAIT FOR TX TO FINISH 
THIS SUBROUTINE IS USED IN THE FIHAWL.TST. 
IT WAITS FOR TRANSMISSION TO COMPLETE IE TX.ACTION, THEN DELAYS 
FOR 5 MILLISECONDS TO ALLOW TIME FOR THE LAST CHARACTER TO GET INTO 
THE FIFO. 

INPUTS: CSRA CONTAINS THE ADDRESS OF THE CSR. 

OUTPUTS: CARRY - SET INDICATES SUCCESS. 
CALLING SEQUENCE: JSR PC.WAITTX 
COMMENTS: 

SUBORDINATE ROUTINES CALLED: DELAY .WAIBIS. 



WAITTX:: SAVE 

MOV 

MOV 
JSR 
6CC 

MOV 
JSR 

SEC 



60t: 



PASS 



RTS 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

♦170536. Rl iPASS TIME-OUT VALUE OF 350 MILLI SECS. 

CSRA.R2 (PASS THE ADDRESS OF THE CSR. 

PC. WAIBIS iUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

60 » (BRANCH IF NO TX.ACTION. ABORT THE TEST. 

•5.R4 {PASS DELAY OF 5 MILLI SECS. 

PC. DELAY (WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 

tSET CARRY TO INDICATE SUCCESS. 

(RESTORE GPRS. 

JSR PC.SCSP)* (RETURN TO PREG05 SUBRT. 

(PASS THE CARRY BIT. SET INDICATES SUCCESS. 

PC 



C/^OHVBO OHU 11 FUNC TST PM»J2 
GLOBAL iXjenOUTINi 



4512 

4515 

4514 

4515 

4516 

45ir 

4510 

45l<» 

4520 

4521 

4522 

4525 

4524 

4525 

4526 

4527 

4526 

452«» 

4550 

4551 

4552 

45:5 

4554 

4 399 



HACftO ni200 IS riM 04 09:28 PAGE 92 
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.SBTTL GLOBAL SUBROUTINE 



SEO 116 



017552 
01 7552 



004567 164S02 



4SS6 
4557 
45S6 

4359 017556 

4540 017562 

4541 017564 
4342 017566 
4345 
4344 

4345 

4546 017572 004767 175572 
^ 5^ ^ 
4346 



016701 162454 

010002 

010505 

012704 177777 



wruLNC 



is'JSIo'?S'SV !S'l^5;cl'5£eS°VJ|f (OUT) LINE 
CONTROL REGISTERS CLNCTRL) TO THE SPECiriEOSTATE T« lL-T»i « 

rOR THE SPECIFIED LINES ARE ALTERED? LNCTRLS 

Iitf>UTS: RO NEU LINE PARAMETERS. 

R5 - BIT flAP or LINES TO BE ALTERED. 
CSRA - CONTAINS ADDRESS OT T»C DUT CSR. 

Enable 'bits^in**t«*sr^**^ ^^^^^ of the tx and rx interrupt 

LNCTRA CONTAINS ADDRESS OF T« OUT LNCTRL REGISTERS. 
OUTPUTS: LNCTRL - SPECIFIED DUT LINE CONTROL REGISTERS ARE ALTERED. 
CALLING SEQUENCE: JSR PC.WTULNC 
COmENTS: 

SUBORDINATE ROUTINES CALLED: ALTFlD. 



WTULNC:: SAVE 



il^y^ CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 



I SET UP T»C PARAMETERS FOR THE CALL TO ALTFLD. 



MOV 
MOV 
MOV 
MOV 



I ♦ 



LNCTRA.Rl ,SET IP THE REGISTER ADDRESS PARAMETER. 

gO'gf I SET IP THE DESIRED REGISTER CONTENTS. 

M^l^L 'flM^ MAP OF LINES TO ALTER. 

♦l.R* I SELECT ALL REGISTER BITS TO BE ALTERED. 



I CALL T>C Si«ROUTINE UMICM ALTERS THE REGISTER CONTENTS. 



4549 



017576 
017576 
017600 



004756 
000207 



60»: 



JSR 

PASS 

RTS 



PC, ALTFLD 

JSR 

PC 



I ALTER THE REGISTER CONTENTS. 

{RETURN TO PREG05 SuBRT, 



iRESfORE GPRS. 
RC.BCSP). 



CJOHVBO OHu 11 ruNC rsr part^ 

GLOBAL SUBftOUTtNE 



4S5i 

4552 

4555 

4S54 

4555 

4556 

4557 

4556 

4554 

4560 

4561 

4562 

4565 

4564 

4565 

4566 

4567 

4566 

4569 

4570 

4571 

4572 

4575 

4574 
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.SBTTL GLOBAL SUBROUTINE UTULPR 



SEQ 119 



017602 
017602 



004567 164252 



4575 
4576 
4577 

457S 017606 
4579 017612 

4550 017614 

4551 017616 
4562 
4585 

4564 

4365 017622 004767 175542 
4367 



016701 162420 
010002 
010503 

012704 177777 



4366 



017626 
017626 
017630 



004756 
000207 



THIS SMOUTINC is'-JSIo-tO*s|}'?„?'y5l« SiS ^^^J't^ot, LI« 

inputs: ro - ney line parameters. 

r5 - bit map of lines to be altered, 
csra - contains address of the dut csr. 

Enable "bits^in'*tme^sr^^**^ of the tx and rx interrupt 
lpra contains address ' of the out lpr. 

OUTPUTS: LPR - SPECIFIED OUT LINE PARAMTER REGISTERS ARE ALTERED. 

CALLING SEQUENCE: JSR PC.UTULPR 

COWENTS: 

SUBORDINATE ROUTINES CALLED: ALTFlD. 



UTULPR:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 



I SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 
t • 

^ k^^Si"^ ^ REGISTER ADDRESS PARAMETER. 

»0.»2 I SET UP THE DESIRED REGISTER CONTENTS 



MOV 



MOV 
MOV 



R5.R5 
*-l.R4 



»5F^y? BIT MAP OF LINES TO ALTER. 
I SELECT ALL REGISTER BITS TO BE ALTERED. 



t CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 



I - 



601: 



JSR 

PASS 

RTS 



PC. ALTFLD 

JSR 

PC 



lALTER THE REGISTER CONTENTS. 

iRETURN TO PREG05 SUBRT. 



iRESTORE GPRS. 
PC.aC SP). 
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4590 
4591 
4592 
459S 
4594 
4595 
4596 
4597 
4596 
4599 
4400 
4401 
4402 
4405 
4404 
4405 
4406 
4407 
4406 
4409 
4410 
4411 
4412 
4415 
4114 
4415 
4416 
4417 
4418 
4419 
4420 
4421 
4422 
4423 

4424 

4425 



.S8TTL INTERRUPT SERVICE ROUTINE 



CLKINT 



017652 
017636 
017640 
017644 
017650 
017652 
017656 
017662 
017664 
017672 
017674 
017674 
017676 
017700 



005767 
001402 
005367 
005767 
001402 
005367 
005367 
001006 
016767 
010046 

104422 

012600 
000002 



THIS ROUTINE IS EXECUTED CLKHRZ TIMES PER SECOND. 
TWO TIMER COUNTERS OOUT' TO ZERO. 



IT DECREMENTS THE 



I»«>UTS: TIMERl TIMER COUNTER 

TIMER2 - TIMER COUNTER «2. 

TIMER3 - TIMER COUNTER FOR CALL OF BREAK MACRO. 

OUTPUTS: THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO. 

CALLING SEQUENCE: PUT KLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 

PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKHRZ) IN 
EITHER TIMERl OR TIMER2 AND POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO 0 ON TIME-OUT. 

COMMENTS: THE 2 COUNTERS UILL NOT WRAPAROUND BUT WILL STOP AT 0. THIS 

ALLOWS THE DETECTION OF A TIME-OUT ANY TIME AFTER THE TIME-OUT 
HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE. 

SUBORDINATE ROUTINES CALLED: NONE. 



162456 

162450 
162446 

162440 
162436 

162432 162426 



CLKINT: 


: TST 


TIMERl 


J CHECK FOR TIMERl AT ZERO. 




BEQ 


21 


iBRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 




DEC 


TIMERl 


1 DECREMENT TIME COUNT. 


2<: 


TST 


TIMER2 


1 CHECK FOR TIMER2 AT ZERO. 




BEQ 


4t 


iBRANCH TO LEAVE IT ALONE IF IT'S ALREADY ZERO. 




DEC 


TIMER2 


{DECREMENT TIME COUNT. 


41: 


DEC 


TIMERS 


{DECREMENT THE BREAK COUNT. 




BNE 


60t 


•EXIT IF NOT TIME TO CALL BREAK. 




MOV 


6C0UNT. TIMERS 


tSET UP TIME TILL NEXT BREAK. 




MOV 


RO.-(SP) 


tSAVE CONTENTS OF RO FROM BREAK MACRO. 




BREAK 


tCHECK FOR OPERATOR CONTROL/C. 






TRAP CIBRK 




MOV 


(SP)».RO 


•RESTORE CONTENTS OF RO. 


60t: 


RTI 







CZOHVBO OHUll TUNC TSr PARr2 
INTERRUPT SERVICE ROUTINE 

4427 

4426 

4429 

4450 

4451 

4452 

4455 

4454 

4455 

4456 

4457 

4456 

4459 

4440 

4441 

4442 

4445 

4444 

4445 017702 012767 OOOOOl 

4446 017710 000002 
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.SBTTL INTERRUPT SERVICE ROUTINE RXOECT 



3E0 121 



* 

♦ INPUTS: RXINTC 

• OUTPUTS: RXINTC 

* CALLING SEQUENCE: 

♦ COMMENTS: THIS ROUTINE DOES NOT REAO THE RXFiro 

• SUBORDINATE ROUTINES CALLED: NONE. 



, ^ - RX INT DECTION ROUTINE 

STORGE rOR THE INTERRUPT COUNT. 
SET TO I. 

ri^.J^L'*^'^^^^ ^ ^-'^^ RXOECT IN THE VECTOR 
LOC AT XuN • 



162356 RXOECT:: MOV ♦I.RXINTC 
RTI 



I INDICATE THAT AN RX-INT HAS OCCUREO. 
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4448 
4449 
4450 
4451 
4452 
4455 
4454 
4455 
4456 
4457 
4458 
4459 
4460 
4461 
4462 
4465 
4464 
4465 
4466 
4467 
4468 
4469 
4470 
4471 
4472 
4473 
4474 
4475 
4476 



.SBTTL GLOBAL TRAP SERVICE ROl'TINE - TP4RTN 



BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 

THIS ROUTINE DETERMINES IF THE 004 TRAP WAS CAUSED BT 

AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON T>» 

STACK. IF THE TRAP IS UNEXPECTED. THIS ROUTINE JUMPS TO THE NORMAL 

DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. NORMAL 

INPUTS: SP - POINTS TO THE PC WHERE THE TRAP OCCURED 

AOflPTR - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR 
TP4FLG - 004 TRAP FLAGS. ULtW, 

OUTPUTS: TP4FLC • BIT 15 IS SET IF "EXPECTED" TRAP OCCURcD. 



CALLING SEQUENCE: 
COMMENiS: 
SUBORDINATE ROUTINES CALLED: NONE 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR 
OCCURENCE OF 004 TRAP VECTORS TO THISROUTINr:' 

^L.^ ^'^^ WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
AORPTR MILL BE HANDLED BY THE NORHAL 004 TRAP SERVICE ROUTINET 



017712 021627 014200 

017716 001402 

017720 000177 162352 

017724 052767 100000 

017752 000002 



TP4RTN:: CMP 
BEQ 
jtiP 

162346 2»: BIS 

RTI 



(SP).«A0RPTR 
21 

8TP4VEC 
•eiT15.TP4FLG 



I COMPARE EXPECTED AOR AGAINST TRAP RET PC 

I IF THEY MATCH. CONTINUE THIS ROUTINE. 

J IF NOT. JUMP TO NORMAL 004 TRAP SERVICE RTN. 

jSET the 004 TRAP OCCURED FLAG- 

lALL DONE. CO BACK TO THE TEST. 
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SEQ 123 



4478 






44^9 






4480 






4481 






44ai> 






44SS 






4484 






4485 






4486 






4487 






4488 






4489 






4490 






4491 






4492 






4493 






4494 






4495 






4496 






4497 






4496 






4499 






4500 






4501 






4502 


017734 






017734 


004567 


4S0S 






4504 


017740 


016701 


4505 


017744 


005201 


4506 


017746 


102001 


4507 


017750 


005301 


4508 


017752 


010167 


4509 


017756 


016703 


4510 


017762 


005777 


4511 


017766 


100402 


4512 






4513 


017770 


052703 


4514 


017774 


010367 


4515 


020000 


012702 


4516 






4517 






4518 






4519 






4520 


020004 


005777 


4521 


020010 


100005 


4522 


020012 


005302 


4523 


020014 


001373 


4524 






4525 


020016 


052767 


4526 


020024 






020024 


004736 


4527 


020026 


000002 



164120 



.SBTTL INTERRUPT SERVICE ROUTINE 



TXAINT 



- TRANSniT ACTION INTERRUPT SF<)VICE ROUTINE 
THIS ROUTINE HANDLES A TX INTERRUPT BY COUNTING THE INTERRUPT, 
SETTING A FLAG IF THE TX.ACTION BIT IS CLEAR. AND READING THE CSR 
UNTIL THE TX.ACTION BIT CLEARS OR THE HAXIHUH READ COUNT IS EXCEEDED. 

INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR. 

TXINTC - HOLDS THE COUNT OF THE NUMBER OF TX INTERRUPTS. 
TXINTF - TX INTERRUPT FLAGS. 

OUTPUTS: TXINTC - CONTAINS THE UPDATED TX INTERRUPT COUNT, 

TXINTF . TX INTERRUPT FLAGS (BIT 15 SET IF TX.ACTION CLEAR 

BIT 14 SET IF MAX READ COUNT EXCEEDED) 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL TXAINT IN THE VECTOR 
LOCATION. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE 



TXAINT:: SAVE 



JSR 



R5.PREG05 



(CALL REGISTER SAVE SUBRT. 



iGET THE TX INT COUNT. 
I INCREMENT THE COUNT. 
iBRANCH IF NO OVERFLOW OCCURED. 
iRESET T>C COUNT TO 177777. 
I SAVE THE NEU COUNT. 
iGET THE TX-INT FLAGS. 
tREAO T»C CSR. 

i AVOID SETTING T»C EfWOR FLAG IF 
|T»CRE IS A TX.ACTION. 
I SET T»C FLAG. 
} UPDATE TtC TXINT FLAGS. 
iSET T»C MAX TX.ACTION READ COUNT. 

!*REAO TIC CSR UNTIL T»C TX.ACTION FIFO IS EIVTt OR T»C MAX READ C(XJNT 
{ IS EXCEEDED. 



162326 




MOV 


TXINTC, Rl 






INC 


Rl 






BVC 


2» 






DEC 


Rl 


162314 


21: 


MOV 


Rl. TXINTC 


162312 




MOV 


TXINTF .R3 


162240 




TST 


8CSRA 




8MI 


4« 


100000 




BIS 


•BIT15.R3 


162274 


4t: 


MOV 


R3« TXINTF 


000040 




MOV 


•32.. R2 



162250 



I - 
61. 



60t: 



TST 
BPL 

DEC 
BNE 

BIS 
PASS 

RTI 



8CSRA 
601 
R2 
6t 

•BIT14. TXINTF 
JSR 



iREAO r»C CSR. 

lEXIT IF TX.ACTION FIFO IS EMPTt, 
tOECREMENT T»C MAX READ COUNT. 
iBRANCH TO READ ANOTHER TX.ACTION IF HAX READ 
tCOUNT IS NOT EXCEEDED. 

iSET TIC "MAX TX.ACTION COUNT EXCEEDED" FL4G. 



PC.B(SP)» 



(RETURN TO PREGOS SUBRT. 
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INTERRliPT SERVICE ROUTINE TXAINT 

4536 
4557 

4538 .SBTTL REPORT CODING SECTION 

4539 

4540 : • ♦ 

4541 t THE REPORT COOING SECTION CONTAINS THE 

4542 ; "PRINTS" CALLS THAT GENERATE STATISTICAL REPORTS. 

4543 I- 
4544 

4545 020050 BGNRPT 

020050 LIRPT:; 

4546 

4547 020030 EXIT RPT 

020030 000167 -WORD J*^^ ^ 

020032 000000 .MORO L10017-2 . 

4548 

4549 .EVEN 
4550 

455x020054 ENORPT 

020034 L 10017: 

020034 104425 TRAP C«RPT 



CZ0MV80 DHC» 11 FUNC TST PART^ 
PROTECTION TABLE 



4555 
4561 
4562 
4565 
4564 
4565 
4566 
4567 
4568 
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.SBTTL PROTECTION TABLE 



SEQ 125 



J THIS TABLE 
I TO PROTECT 



IS USED BY THE RUNTIME SERVICES 
THE LOAD MEDIA. 



020056 
020036 

4569 

4570 020036 
020040 
020042 



45-^1 
4572 
45 73 
45^4 
4575 



177777 
177777 
171^71 



020044 



BGNPROT 



•I 
I 
-I 

ENDPROT 



LIPROT;: 

»(VrSET INTO P- TABLE FOR CSR ADDRESS 
lOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
lOFFSET INTO P TABLE FOR DRIVE NUMBER 
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SEQ 126 



459 7 
4598 
4599 
4600 
4601 
4602 
4603 
4604 
4605 
4606 
4607 
4608 
4609 
4610 
4611 

4612 
4613 



4614 

4615 
4616 



4617 

4618 
4619 



4620 

4621 
4622 



4623 

4624 
4625 
4626 

4627 
4628 
4629 
4630 



4631 
4632 
4633 
4634 
4635 
4636 



020044 
020044 

020044 
020044 

020050 
020052 
020052 

020054 
020054 
020060 
020062 
020062 

020064 
020064 

020070 
020072 
020072 

020074 
020074 
020100 
020102 
020102 
020104 
020110 
020110 
020110 



020112 
020112 
020116 
020120 
020122 
020126 
020132 
020136 
020142 
020150 



.SBTTL INITIALIZE SECTION 



THIS SECTION CONTAINS THE CODE WHICH IS PERrORHEO AT THE BEGINNING OF 
EACH PASS OR AFTER A CONTINUE COTIHANO. 
THIS CODE PERFORMS THE FOLLOWING ACTIONS: 

MOVES THE INFORMATION HELD IN THE HARDWARE P- TABLE INTO THE GLOBAL 
DATA AREA. 



012700 000040 
104447 

103416 



012700 000037 
104447 



BGNINIT 

:SEE IF PROGRAM JUST STARTED. BR IF YES 
READEF «-F. START 



LtlNIT:: 



BCOMPLETE 



NEWSTA 



tSEE IF PROGRAM JUST RESTARTED. BR IF YE<: 
READEF tEF. RESTART 



103556 



012700 000035 
104447 



BCOMPLETE 



NEURES 



{SEE IF THIS IS A NEW PASS. BR IF YES 
READEF AEF.NEW 



103555 



012700 000036 
104447 

103161 

000167 000540 



104433 



BCOnPLETE 



NEUPAS 



tSEE IF PROGRAM WAS JUST CONTINUED 
READEF tEF . CONT INUE 



NEWSTA: 



8NC0NPLETE 
JMP ENDIT 
6RESET 



GETPRM 



MOV 
TRAP 

BCS 



HOV 
TRAP 

BCS 



HOV 
TRAP 

BCS 



MOV 
TRAP 

BCC 



•EF. START. RO 
C«REFG 

NEWSTA 



•ef.restart.ro 

CIREFG 



fClMES 



•EF.ICW.RO 
C«REFG 

NEWPAS 



•ef.continue.ro 

C«REFG 
GETPRM 



iRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 



T9AP 



012700 
104462 
010001 
012167 
012167 
012167 
012167 
026727 
001004 



000114 



162156 
162154 
162152 
162150 
162144 



1 SET UP FOR LINE TIME aOCK INTERRUPTS. 

' CLOCK L.Rl jCET THE CLOCK PARAMETERS 



000062 



MOV (R1)*.CLKCSR 

MOV (R1)*.CLKBRL 

MOV (R1)».CLKVEC 

MOV CRl)».CLKHR2 

CMP CLKHRZ.*50. 

BNE 2« 



MOV 
TRAP 
MOV 

I STORE CLOCK CSR ADDRESS. 
(STORE CLOCK BUS REQ INT LEVEL. 
I STORE CLOCK INTERRUPT VECTOR, 
i STORE CLOCK FREQUENCY. 
I TEST FOR 50MZ LINE FREQUENCY. 
(BRANCH IF CLOCK IS NOT 50HZ. 



CSRESET 



••L.RO 
CiCLCK 
RO.Rl 
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SEQ 12/ 



4637 020152 


012767 


000024 


162144 




MOV 


•20. .NSTICK 


1 INDICATE 20MS PER CLOCK TICK. 




4638 020160 


000403 








BR 


4t 






4639 020162 


012767 


000021 


162134 


21: 


MOV 


•17..MSTICK 


» INDICATE 17 MS PER CLOCK TICK. 




4640 020170 








4f : 


SETVEC 


CLKVEC . «CLKINT . «PRI06 


1 INITIALIZE CLOCK INTERRUPT VECTOR, 


020170 


012746 


000300 










MOV 


9PRI06. (SP) 


020174 


012746 


017632 










MOV 


^LKINT. CSP) 


020200 


016746 


162104 










MOV 


CLKVEC. -CSP) 


020204 


012746 


000003 










MOV 




020210 


104437 












TRAP 


CiSVEC 


020212 


062706 


000010 










ADD 




4641 020216 


016700 


162070 






MOV 


CLKHRZ.RO 


{INITIALIZE THE BREAK COUNT 


4642 020222 


006300 








ASL 


RO 


1 TO CAUSE A BREAK 




4643 020224 


010067 


162072 






MOV 


RO.BCOUNT 


t EVERY 2 SECONDS. 




4644 020230 










SETPRI 


«PRI05 


tALLOU CLOCK INTERRUPTS DISABLE 


OTHERS. 


020230 


012700 


000240 










MOV 


<^PRI05.R0 


020234 


104441 












TRAP 


CiSPRI 



4645 






4646 






4647 






4648 






4649 






4650 020236 


016767 


157542 


4651 020244 


012767 


017712 


4652 






4653 






4654 






4655 020252 


005067 


162022 


4656 020256 


012767 


000100 


4657 020264 


012700 


002302 


4658 020270 


016701 


162010 


4659 020274 


004767 


173666 


4660 020300 


016767 


161772 


4661 020306 


103403 




4662 020310 


005067 


161776 


4663 020314 


000402 




4664 






4665 






4666 






4667 020316 


004767 


173230 


4668 






4669 






4670 






4671 






4672 020322 


016767 


157456 


4673 020330 


012767 


017712 


4674 020336 


005067 


161736 


4675 020342 


005067 


161734 


4676 020346 


012700 


002302 


4677 020352 


016701 


161752 


4678 020356 


005067 


161750 


4679 020362 


005067 


161746 


4680 020366 


004767 


173574 


4681 020372 


016767 


161700 


4682 020400 


103003 




4683 020402 


012767 


000001 


4664 020410 


005067 


161650 


4685 020414 


000167 


000006 



162032 
157532 



162016 



157476 



; ENABLE THE LINE TIME CLOCK (LTC) CHECKING TO MAKE SURE THAT THE CSR 
t IS ACCESSABLE. 

i FIRST SET UP TO CATCH ANY 004 TRAPS UHICH OCCUR: 

* nOV 4.TP4VEC iSAVE THE EXISTING 004 TRAP VECTOR. 

MOV «TP4RTN.4 iSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 



t 

t - 



161746 
157446 



157404 

161722 



ENABLE LTC CHECKING FOR 004 TRAP IN CASE CSR IS NOT THERE. 

CLR TP4FLG {CLEAR THE 004 TRAP FLAG. 

nOV «eiT6.U0RDl (SET UP TO SET BIT6 OF THE LTC CSR. 

nOV •UOROl.RO (SET UP UORDl AS THE CKTRAP MOVE SOURCE. 

nOV CLKCSft.Rl (SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE. 

JSR PC.CKTRAP (HOVE AND CHECK FQR TRAP. 

nOV TP4VEC.4 (RESTORE THE NOfttlAL 004 TRAP VECTOR. 

BCS 61 (IF NO TRAP. LTC IS THERE SO CONTINUE. 

CLR CLKHRZ iCLEAR LTC FREQUENCY UORO TO INDICATE NO LTC. 

BR Bt (BYPASS THE FQLL0UIN6 CALIBRATION PROCEDURES. 

(^CALIBRATE THE DELAY ROUTINE HILLI -SECOND DELAY COUNT VALUE. 

61: JSR PC.CALHSL 

(*CHECK FOR nE?t«RY HANAGEHENT PRESENT ON THIS MACHINE. 
I IF HEH HOT IS PRESENT, DISABLE IT. 

B»: nOV 4.rP4VEC (SAVE THE EXISTING 004 TRAP VECTOR. 

(SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
(CLEAR THE 004 TRAP FLAG. 

(PREPARE TO CLEAR THE MEM MGT SRO REGISTER. 
(SELECT CLEARED WORD AS CKTRAP RTN SOURCE. 
(SELECT HGH HGT SRO REGISTER AS DESTINATION. 
(INDICATE NO HEH HGT PRESENT IN CASE IT ISN'T. 
(INDICATE HEH HGT IS NOT ENABLED. 
(CLEAR THE HEM HCT SRO REG AND CHECK FOR TRAP. 
(RESTORE THE NORMAL 004 TRAP VECTOR. 
(SKIP INDICATING HEH HGT PRESENT IF IT ISN'T. 
(INDICATE THAT HEH HGT IS PRESENT. 
tCLR COUNTER USED IN REPORTING ROH VERSION «. 
(SKIP AROUND THE BUS RESET. ITS BEEN DONE. 



101: 



HOV 


4,TP4VEC 


HOV 


#TR4RTN.4 


CLR 


TP4FLC 


CLR 


UORDl 


HOV 


•UOROl.RO 


HOV 


mSRO.Rl 


CLR 


HHPRES 


CLR 


HMENAB 


JSR 


PC.CKTRAP 


HOV 


TP4VEC,4 


BCC 


101 


MOV 


♦1. HHPRES 


CLR 


PASCNT 


JMP 


NEUPAS 
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4oO 7 


f\'^t\A 
AOAA ^A 


1 AA A 
104HdO 








AAQAA.7 
OODOO f 


loiooo 




AOAA 








AOAAO^ 

0204c6 


A1 d7A.7 
Olc rO r 


1 77777 
1 f f f f f 


































4o« 


A^AA 


AAC^OA.7 


1 Al A.OA 
l6lOc4 


46% 


0d0440 


AA1 AAO 

OOlOO^ 




469 f 


020442 


AA^1UL7 


loioio 


4090 








4099 








** fSjM 


0c04^0 






A 7A1 


0«f0440 


AA^>A7 
OODcO f 


IDlDDc 




AOAA<(0 
Ocv4D^ 


Ad4l7A7 
OcD rO r 


lOl^^O 


A7AX 


A^AA^A 
0cv400 






4704 








A7A<\ 
H r v3 


OcV^Oc 








AdAAilD 
0c040c 


Al 7AA 

OlO ' OU 


1 Al <^XA 




0cv400 


104^H^ 






AOAA7A 
0c04 f O 


A1 AAA1 
OlOOOl 




^ « UD 


0c04 f c 
AOAA7D 


100401 




A7A7 


AOAA7A 
02U4 /4 


AAA7iLA 
OUOf D4 












A 7 AO 








A71 A 








A71 1 


ADAA 
Uc04 f O 


A1 Ol il7 
OlclO ' 


1 Al 


A71 O 
4 ' Ic 


AOAf^Ad 
OcODOc 


Al 01 AO 

OlclOc 




A71 X 

^ f lO 


AOACkAA 
0c0D04 


A1 AOJ17 
OlOcD r 


1 Al CAa 
101D04 


A 71 A 
^ f 1^ 


0<fOD10 


AA.07A0 
OOc r Oc 


AAAAAA 
000004 


A71 <; 
^ f ID 




A1 AOiL7 
OlOcO r 


1 Al A7A 
1014 f O 


* » lO 


AOA<^OA 
OcODcO 


A1 01 A.7 

Ol£l6 f 


1 A 1 A 7 A 
1614 f4 


A71 7 


AOA<%OA 
OcODc4 


111 1 A7 
XlllD r 


1 Al A70 
1014 fc 


A71 A 
^ f lO 








A71 Q 

^ f iTf 








A7dO 








■t f cX 








^ f tic, 


A^A>^XA 


A1 A7A1 
OlO rOl 


1 Al A70 
1014 f c 






K/V^CVX 








fV>^DAl 






a:>a^aa 


Al 07AX 
OliC r OO 


OOOOO f 


■f t CO 


A^Ai^AA 


Al 07AD 
Olc r Oc 


OOccOO 


A7P7 


OcVDDO 


Al Al DO 
OlOlcc 








AA*kDA1 








OODcOl 




47M 




AOS 




4731 




373 




4732 








4733 








4734 








4735 








4736 


020562 


012700 


002412 


4737 


020566 


012701 


002612 



161570 



NEWRES: 

NEUPAS: 
J ♦ 



8RESET I RESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 

TRAP C$RESET 

CLR PASCNT iCLR COUNTER USED IN REPORTING ROM VERSION «. 

MOV ♦-l.UNITN iRESET LOGICAL DEVICE TO -1 



J INCREMENT THE PASS COUNTER. CORRECT FOR ANY OVERFLOW. 
THIS COUNTER IS USED IN THE ROM VERSION TEST. 



INC 
BNE 
DEC 



PASCNT 
GETPRM 
PASCNT 



INCREMENT THE PASS COUNTER. 

{BRANCH IF UE HAVE NOT YET* OVERFLOWED. 

iSET PASS COUNT TO 177777 OCTAL. 



161332 



I GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
GETPRM: 

INC UNITN 
CMP UNITN. LIUNIT 
BGE NEWPAS 



{INCREMENT LOGICAL DEVICE NUMBER 
I SEE IF MAXIMUM UNIT NO. EXCEEDED 
iBR IF YES 



GPHARO UNITN. Rl 

BCOMPLETE 
BR GETPRM 



301 



I GET P- TABLE POINTER INTO Rl 

iBR IF DEVICE AVAILABLE 
tSKIP THIS DEVICE 



MOV 

TRAP 

MOV 

BCS 



UNITN. RO 

C»GPHRD 

RO.Rl 

30$ 



30$; 



HARDWARE 

MOV (R1)«.CSRA 

MOV (R1)*.R2 

MOV R2.RXVECA 

ADO «4.R2 

MOV R2.TXVECA 

MOV (R1)».ACTLNS 

NOVB (RD.LOPaCK 



PARAMETER MOVING CODE ♦••♦•***♦**♦♦*** 

iSTORE OHU-11 CSR ADDRESS IN DEV . REG . ADDRESS TABLE 

I GET THE RX INTERRUPT VECTOR ADDRESS. 

(STORE RX INT VECTOR ADDRESS. 

{CALCULATE TX INTERRUPT VECTOR ADDRESS. 

{STORE TX INT VECTOR ADDRESS. 

{STORE DHU-11 ACTIVE LINE BIT MAP 

{STORE DHU-11 tOOPBACK NODE 



i 

»- 



12«i 



CALDJLTATE DEVICE REGISTER ADDRESSES. AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 



MOV 
INC 
INC 
MOV 
MOV 
MOV 
INC 
INC 
DEC 
BNE 



CSRA.Rl 

Rl 

Rl 

•7.R3 

9RBUFA.R2 

R1.(R2)» 

Rl 

Rl 

R3 

121 



{COPY CSR ADDRESS 
(INCREMENT CSR ADDRESS 
{ COPY BY 2. 
(SET UP REGISTER COUNT 

{GET LOCATION WHERE R8UF ADDRESS GOES IN TABLE 

(STORE REGISTER ADDRESS IN TABLE 

(INCREMENT REGISTER ADDRESS 

: BY 2. FOR THE NEXT DEVICE REGISTER. 

(DECREMENT REGISTER COUNT 

(LOOP IF NOT DONE 



INITIALISE THE BMP CODE QUEUE. 

MOV •BMPCQB.RO (GET THE START ADDRESS OF THE QUEUE. 

MOV «BMPCQE.R1 (GET THE END ADDRESS OF THE QUEUE. 
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4 738 
4739 
4740 
4741 
4742 
4743 
4744 
4745 
4746 
4747 
4746 
4749 
4750 



4751 
4752 
4753 
4754 
4755 
4756 
4757 



4758 



4759 
4760 



020572 
020576 
020600 
020602 



020604 
020612 
020614 
020622 
020624 
020624 
020630 
020634 
020M0 
020642 
020644 
020650 



010067 
005020 
020001 
103775 



032767 
001416 
026727 
003412 

016746 
012746 
012746 
010600 
104417 
062706 



020650 005067 



020654 
020654 
020660 
020662 
020662 
020662 



012700 
104441 



104411 

000000 



161612 



14$ 1 



MOV RO.BMPCQP iSET THE POINTER TO THE START OF THE QUEUE. 

CLR CRO)» , CLEAR OUT THE CONTENTS OF THE QUEUE. 

CMP RO.Rl I CHECK IF END OF QUEUE HAS BEEN REACHED. 

8L0 14$ I LOOP IF NOT ALL DONE. 



i REPORT THE UNIT NUMBER IF THE SOFTWARE P- TABLE QUESTION WAS ANSWERED YES, 
i Ai4D THE MAXIMUM UNIT NUMBER IS GREATER THAN 1. 



000020 
161172 



161374 
005231 
000002 



000006 
161374 

000340 



161376 
000001 



BIT 
BEQ 

CMP 
6LE 

PRINTF 



«6IT4. OPTION 
16$ 

L$UNIT.«1 
16$ 

♦MFUNIT.UNITN 



16$: 

ENDIT: CLR 



I CHECK IF THE QUESTION WAS ANSWERED YES. 

J SKIP REPORTING UNIT NUMBER IF IT IS DISABLED 

(CHECK MAXIMUM NUMBER OF UNITS SELECTED. 

(DO NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 

{REPORT UNIT NUMBER. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 



UNITN. (SP) 
#MFUNIT,-CSP) 
#2.-(SP) 
SP.RO 
C$PNTF 
#6,SP 



CTRLCF 



iCLR THE CTRL-C TEST ABORT FLAG. 



SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 



i - 



SETPRI •PRI07 
ENDINIT 

TNUM " 0 



jSET PROCESSOR PRIORITY TO 7. 

MOV 
TRAP 



L10021: 



TRAP 



•PRI07,R0 
CiSPRl 



C$INIT 



{INITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE. 



NiO 
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INITIALIZE SECTION 

4769 
4770 

4771 .SBTTL AUTOQROP SECTION 

4772 

4773 

4774 

4775 ; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 

4776 8 THE "ADR" FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 

4777 ; SEE IF THEY WILL RESPOND, THOSE THAT DON'T ARE IMMEDIATELY 
4 778 I DROPPED FROM TESTING. 

4779 
4780 

4781 020664 BGNAUTO 

020664 L$AUTO:: 

4782 
4789 

4790 020664 ENDAUTO 

020664 L 10022: 

020664 104461 TRAP CI AUTO 



CZOMWBO OMU II fUK rST 
AUTOOROP SEC f ION 



4 7«»9 
4600 
4601 
4602 
460S 
4604 
4605 
4606 
4607 
4606 
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.S8TTL CLEANUP COOING SECTION 

iTKC CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERrOAHEO 
I ATTER T»C HAROUARE TESTS HAVE BEEN PERFORMED. 



SCO 131 



I - • 



4609 
4610 
4611 
4612 

4613 
4814 
4623 
4624 



4625 
4637 
4636 
4839 
4640 



020666 
020666 

020666 005767 161356 
020672 001401 
020674 

020674 104433 
020676 



020676 

020676 104432 
020700 000002 



020702 
020702 

020702 104412 



BGNCLN 



TST 
BCQ 
BRESET 



CTRLCr 
2< 



2i: 



LICLEAN: : 

lOIO UE GET HERE Bt CTRL C FROM TEST? 
iCTRL C FROM TEST? NO. SKIP BUS RESET. 
tVES. CLR ANT DMAS OR OUTSTANDING INTERRUPTS. 

TRAP C PRESET 



EXIT CLN 

.EVEN 
CNDCLN 



TRAP 
.WORD 



OEXIT 
L 10023 



L 10023: 



TRAP 



C«CLEAN 



bt^^m Pflb'lAli i^^f^lik' ''^CRO mZOO is IAR 84 09:28 



w X. 

PAGE lOS 



360 1S2 



4849 
4850 
4851 
4852 
4853 
4854 
4855 
4856 
4857 



















4659 








4860 020704 








020704 


010046 






020706 


012746 

VAC' 






020712 


C12746 


000002 




020716 


010600 






020720 


104417 






020722 


062706 


000006 




4861 020726 


000427 






4862 








486S 020750 


045 


101 


040 

w^w 


020755 


125 


116 


111 


020756 


124 


045 


104 








1 A1 




v^v 


1 A4 


1 OO 


020747 


117 


lew 


1 

icv 


020 7SP 




1 A4 


AAA 


020755 


106 


122 


117 


020760 


115 


040 


106 


020765 


125 


122 


124 


020766 


110 


105 


122 


020771 


040 


124 


105 


020774 


125 


124 


111 


020777 


116 


107 


056 


021002 


045 


116 


000 


4864 




4865 021006 








4866 








4867 021006 








021006 


000167 







.SBTTL DROP UNIT SECTION 



I THE OROP-tWIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
I TO NO LONGER BE TESTED. 
I - 



BGNDU 

PRINTF MROP.RO 



DROP: 



I IDU: : 

I REPORT UNIT THAT HAS BEEN DROPPED. 

MOV 

riov 
nov 
nov 

TRAP 
ADD 

BR EDROP t BRANCH AROUND THE MESSAGE. 

.ASCIZ/#A UNIT«6#A DROPPED FROM FURTHER TESTING. «N/ 



EDROP: 



021010 
4868 
4869 

4870 021012 
021012 
021012 



000000 



104453 



.EVEN 
EXIT 

ENOOU 



OU 



L 10024: 



.WORD 
.WORD 



TRAP 



RO.-(SP) 

♦DRCP.-(SP) 

♦2. (SP) 

SP.RO 

CiPHJf 

•6,SP 



J»JMP 
L 10024 2 



C»Dl 
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>E0 ISS 



40/9 
4880 
488 1 
4882 
4883 
4884 
4885 
4886 
4887 
4888 
4889 

4890 
4891 



4892 
4895 
4894 
4895 
4896 



4697 



021014 
021014 

021014 

021014 000167 
021016 000000 



021020 
021020 

021020 104452 



.SBTTL AOO UNIT SECTION 



THE ADD UNIT SECTION CONTAINS ANY CCOE THE PROGRAHMER WISHES 
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST C»CLE. 



BGNAU 
EXIT AU 

.EVEN 
ENDAU 



LIAU:5 



.WORD J*JHP 
.WORD L 10025 -2- 



L 10025: 



TRAP C«AU 



I fiJNL T5T PA« 



8^. 
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SEQ 1S4 



4649 
4900 
4901 
4902 
490S 
4904 
4905 
4906 
4907 
4906 
4909 
4910 
4911 
4912 
4913 

4914 
4915 
4916 
4917 
4916 
4919 
4920 
4921 
4922 
4923 
4924 
4925 
4926 
4927 
4926 
4929 
4930 
4931 
4932 
4933 
4934 
4935 
4936 
4937 
4936 
4939 
4940 
4941 
4942 
4943 
4944 
4945 
4946 
4947 
4946 
4949 
4950 
4951 
4952 
4953 
4954 



021022 
021022 

021022 
021030 
021036 
021044 
021052 



021060 
021066 
021074 



021076 
021102 
021106 
021112 
021114 
021120 
021126 
021130 
021134 
021140 
021142 
021146 



021150 
021154 
021162 
021166 
021172 
021176 
021200 
021204 
021206 



000001 
012767 
012767 
012767 
012767 
012767 



016767 
012767 
005005 



016700 
012701 
004767 
103402 
052705 
042767 
010100 
016701 
004767 
103403 
052705 
000434 



012702 
016767 
016700 
012701 
004767 
103402 
052705 
010100 
016701 



000001 
177777 
000145 
005262 
011430 



156720 
01771i 



161124 
021274 
173054 

100001 
000017 

161072 
173026 

100002 



000010 
161046 
000104 
021274 
172770 

100001 

000060 



.SBTTL HAROIMRE TEST 



ADRA 



- REGISTER ADDRESS TEST • 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPOND TO THE PROPER 
UNIBUS HANDSHAKING SIGNALS UHEN ACCESSED. IF THE DHUll DOES NOT RESPOND 
TO THE ACCESS ATTEMPTS (IF THE DHUll IS AT THE WRONG ADDRESS. FOR EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE 0 ONLY. 



161224 
161212 
163006 
163002 
162776 



161210 
156710 



BGNTST 

TNUM - 
MOV 
MOV 
MOV 
NOV 
MOV 



TNUM ♦ 1 

•TNUM.TSTNUM 

♦-1.CTRLCF 

♦101..ERRNBR 

«EM0103.ERRMSG 

4ER0101.ERRBLK 



Tl* • 

I INCREMENT ThE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. (1) 

{INDICATE THAT WE ARE IN A TEST. 

iSET THE TEST ERROR NUMBER IN THE TABLE. 

iSET UP THE TEST FAILURE MESSAGE IN THE TABLE. 

I SET -UP THE ERROR ROUTINE IN THE ERROR TABLE. 



000146 4t: 



t set up to catch any 004 traps which occur: 

mov 4.tp4vec tsave the existing 004 trap vector. 

mov •tp4rtn.4 (set 004 trap vector to our service rtn adr. 

clr r5 i clear the error flags. 

There begins the loop to test the registers for a line. 

t first test the csr and set the ind.aor.reg (i.a.r) field. 

* MOV csra.ro iSet up csr as the cktrap move source. 

MOV #52t.Rl I set up DESTINATION LOCATION FOR CKTRAP MOVE. 

JSR PC. CKTRAP I MOVE AND CHECK FOR TRAP. 

BCS 4t I IF NO TRAP. BYPASS ERROR. 

BIS •100001. R5 iSET FATAL READ ERROR FLAGS. 

BIC •17.52t iCLEAR THE I.A.R FIELD OF THE CSR DATA. 

nOV Rl.RO tUSE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 

MOV CSRA»R1 tSET UP CSR AS THE CKTRAP MOVE DESTINATION. 

JSR PC. CKTRAP iMOVE AND CHECK FOR TRAP. 

BCS 6$ I IF NO TRAP. BYPASS ERROR. 

BIS •100002. R5 I SET FATAL WRITE ERROR FLAGS. 

BR 40t lEXIT AND REPORT FATAL ERROR. 



000110 



I* 
t 

t - 
6«: 

6$: 



10(: 



NOW. WE TEST EACH REGISTER FOR THIS LINE. 

NOV •6..R2 iINIT REGISTER COUNTER TO 6. 

MOV CSRA.50« {INITIALIZE THE REGISTER POINTER. 

NOV 501. RO tSET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 

MOV •521. Rl tSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 

JSR PC. CKTRAP iPERFORM THE MOVE. CHECK FOR TRAP. 

BCS 101 ilF NO TRAP. BYPASS THE SETTING OF ERROR FlACS. 

BIS •100001. R5 I SET FATAL READ ERROR FLAGS. 

MOV Rl.RO jUSE OLD DEST AS SRC FOK CKTRAP MOVE. 

MOV 50t.Rl I SET UP REGISTER AS THE DEST FOP CKTRAP MOVE. 
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172750 



4955 


021212 


004767 


4956 


021216 


103402 


4957 


021220 


052705 


4956 


021224 


005267 


4959 


021230 


005267 


4960 


021234 


005302 


4961 


021236 


001351 


4962 






496S 






4964 






4965 






4966 






4967 






4968 


021240 


016767 


4969 


021246 


005705 


4970 


021250 


100012 


4971 






4972 






4973 






4974 


021252 






021252 


104460 


4975 






4976 






4977 


021254 






021254 


016700 




021260 


104451 


4978 


021262 


005067 


4979 


021266 






021266 


104444 


4960 


021270 


000402 


4961 






4982 






4963 


021272 


000000 


4964 


021274 


000000 


4965 






4966 






4967 


021276 


005067 


4966 


021302 
021302 






021302 


104401 



100002 
000042 
000036 
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SEO 155 



JSR 


PC. CK TRAP 


BCS 


121 


BIS 


•100002. R5 


INC 


501 


INC 


501 


DEC 


R2 


BNE 


8t 



I PERFORM THE MOVE. CHECK FOR TRAP. 

I IF NO TRAP. BYPASS THE SETTING OF ERROR FLAGS. 

iSET FATAL URITE ERROR FLAGS. 

I INCREMENT THE REGISTER 

i POINTER BY 2. 

I COUNT THE REGISTER. 

iLOOP TO TEST THE NEXT REGISTER ADDRESS. 



161032 156536 



t DONE CHECKING DEVICE REGISTER ADDRESSES. 
I REPORT ANY ERRORS AND EXIT, 
i - 

401: 



MOV 
TST 
BPL 



TP4VEC.4 
R5 
6u» 



iRESTORE THE NORMAL 004 TRAP VECTOR. 
I CHECK THE ERROR FLAGS. 
lEXlT ROUTINE IF NO ERRORS. 



I *R?PORT 

t • 



"OEVICC REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



CSERROR 



160744 
160762 



DOOU UNITN 



CLR CTRLCF 
OOCLN 



BR 



60t 



J DROP THIS L«IIT FROM FUTHER TESTING. 

MOV UNITN.RO 
TRAP CIDODU 

t INDICATE NO CTRL-C ABORT FROM TEST. 

iWORT THIS SUB PASS. 

TRAP C»DCLN 

I 



,*•*•*****•***••* LOCUL STORAGE. •♦•*••••*•••*•••*••••••••••••••••••••••*• 

sot: .yORO 0 tSTORAGE FOR THE SOURCE OR OEST OF T»C CKTRAP HOVE. 

521: .yORO 0 iSTORRCE TOR TIC SOURCE OR CEST OF T« CKTRAP MOVE. 

,•••**•*****•*•***** END A************************************************ 



160746 



601: CLR CTRtCF 
ENDTST 



tlMOICATE THAT UE ARE NOT UITHIN A TEST. 

L 10026: 



TRAP CtETST 
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>EQ lit 



4990 
4991 
499? 
4993 
4994 
4995 
4996 
4997 
4998 

4999 



SOOO 
5001 
5002 
5003 
5004 
5005 
5006 
5007 
5008 
5009 
5010 
5011 
5012 
5013 
5014 
5015 
5016 
5017 
5018 
5019 
5020 
5021 
5022 
5023 
5024 
502S 
5026 
5027 
5028 
5029 
5030 
5031 
5032 
5033 
5034 
5035 
5036 
5037 
5038 
5039 
5040 
5041 
5042 
5043 



.S8TTL HAROUARE TEST 



- OMASTA 



021304 
021304 
021304 
021304 
021310 

021312 
021320 
021326 
021334 
021342 
021350 



021356 
021362 



• DMA START BIT TEST - 
THIS TEST VERIFIES THAT THE OMA.START BIT IN TKE DOT'S LINE CONTROL 
REGISTERS UILL INITIATE OHA TRANSMISSION ON THE SELECTED LINE. 
THIS TEST IS PERFORHED IN INTERNAL LOOPBACK. ON ALL ACTIVE LINES. 



012700 
104441 

000002 
012767 
012767 
012767 
012767 
012767 
012767 



000240 



000002 
177777 
000001 
007641 
005403 
013136 



004767 172634 
103145 



021364 004767 173160 



021370 
021374 
021400 
021404 
021410 
021414 



021420 
021424 
021426 
021434 
021436 
021440 
021442 
021446 



016705 
012700 
004767 
012700 
004767 
004767 



016705 
005001 
012767 
000241 
006005 
103112 
004767 
103113 



160624 
000204 
176146 

177670 
176166 
175502 



160574 
007642 

173722 



160734 
160722 
162514 
162510 
162504 
162500 



BGNTST 
SETPRI 



TNun 

NOV 
NOV 

nov 

HOV 

nov 

HOV 



•PRIOS 



• TNUn » 1 
•TNUn.TSTNUM 
•-l.CTRLCF 
•l.ERRTYP 
•40C1..ERRNBR 

«Emooi.EmmsG 

«ER9101.ERRBLK 



T2* • 

lALLOU LTC INTERRUPTS. 

MOV •PRI05.ro 
TRAP CtSPRI 

I INCREMENT THE ASSEMBLf TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. C40) 

I INDICATE THAT UE ARE IN A TEST. 

tSET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET THE FIRST ERROR NUTQER IN ERROR TABLE. 

tSET ERROR MESSAGE ADDRESS IN ERRTBL. 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
aEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR »»> 4001 <«<«. 

JSR PC.CLMIST iRESET THE OHU-11. REPORT ANY ERRORS FOUNT. 

BCC SOI {RESET FAILURE?. ABORT THIS TEST. 

JSR PC.INDATP tINITIALSE THE 256 BYTE DATA PATTERN. 



t * 
I 
t 
t 

i 
I 



SET INTERNAL LOOPBACK. ENABLE RECEIVER FUNCTIONS ON ALL ACTIVE LINES. 
SET LPR ON ALL LINES TO S8.4K BAUD. A BITS PER CHARACTER. ODD PARITY. 
2 STOP BITS. 

ENABLE TRANSMITTERS ON ALL ACTIVE LIICS. 

MOV ACTLNS.RS iFASS THE ACTIVE LINE BIT HAP. 

MOV •204.R0 tPASS T»C UCTRL CONTENTS. 

JSR PC.UTVLNC {INITIALISE THE LNCTNL REGISTERS. 

MOV •177670.ro iPASS T>C LPR CONTENTS. 

JSR PC.UTyLPR iINITIALSE TIC LPR REGISTERS ON ALL LINES. 

JSR PC.rxENBL {ENABLE TRANSMITTERS ON ALL LUCS. 



t ♦ 



SET-UP OUTER LOOP TO TEST THE ONA.START BIT ON ALL ACTIVE LINES. 



MOV ACTLNS.R5 

CLR Rl 

162416 2t: MOV 44002. .ERRNBR 

CLC 

ROR R5 

BCC 141 

JSR PC.PUFIFO 

BCC 50 t 



{GET T»C ACTIVE LINE BIT NAP. 

{aEAR THE LINE NUMBER COUNTER. 

tSET THE ERROR NUWI TO 4002. 

(CLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 

t SHIFT THE BIT NAP INTO TIC CARRY BIT. 

I DO NOT TEST TIC LINE IF IT IS INACTIVE. 

(PURGE TIC FIFO. 

I GO REPORT ERROB IF FIFO UILL NOT aEAR. 



; PERFORM OMA.START BIT TESTING ON EACH LINE INDIVIDUALLY. 

t TEST EACH OMA.START BIT BEFORE TX'ING DATA PATTERN. REPORT ERROR tF SET. 

; SET OMA.START BIT ON LUT. VERIFt IT IS SET. REPORT ERROR IF aEAR. 

I WAIT FOR DMA TO COMPLETE. 
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5044 
















5046 








504 7 


021450 


00526 7 


1625 ^ 6 


5048 


0cl454 


012702 


002650 


5049 


021460 


012705 


A^^t Ail 

00014* 


5050 


021464 


004 76 7 


4 7^ 7 1 A 

172710 


5051 


0214 70 


10506 7 




505^ 








5055 
















5055 








505o 


02X4 f2 




lOc3D^ 


505 f 


1 ^ TIL. 


/M /%1 77 

OlOl ( 1 


1 iLACOA 


5050 


021502 


* AC7 77 

105 f f f 


1 iL.A^VA 
lOUDd^ 


5059 


021506 


lUUUOV 




50d0 








50^I 








50oc 








50o3 


Ocl5IU 








Ocl51^ 


A1 A1 AY 




50o5 


021516 


A1 ^7A1 
Olc rUl 






Ocl5<cc 


A1 iL7A3 
UlO rUc 


1 AACLAA 


50b 


0215<f6 


AAA7iL7 


1 7CL7AA 


5Uoo 


0215<92 


105U45 




5Uo9 


021554 


012 704 


/\A/\AAC 


50 /O 


021540 


004767 


17^16 


r 1 


021544 


0105U1 












DU r O 








Dv / ^ 








3U r D 








50 fO 


021546 


005267 


162 500 


DU f ( 


021552 


010177 


160450 




021556 


< 777 

10577 7 


100460 


DU f 9 


021562 


100452 












































IH/OD 




AAQAAT 








A1 D7AA 
Ulc f U# 


AAAOAA 


DVO r 




A1 07A7 


AA7iLA7 






A1 77AO 


XOV^c^ 






lUUUcl 








A1 ^7AA 


1 7AYA1 






AAAOAA 








AA1 AA7 






not A1 


AA^Oil7 


li^^OXA 
XO^cdV 




OD1 ADO 


AAA7A7 


X f ^03c 


















5097 


021632 


000757 




5098 


021634 


005203 




5099 


021636 


020327 


000144 


5100 


021642 


002753 
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SEQ 157 



» VERIFY DMA START BIT IS CLEAR, REPORT ERROR IF SET. 

s VERIFY CORfiECT NUMBFR OF CHARS UERE RECEIVED, REPORT ERROR IF < EXPECTED. 



i - 



ERR^eR I SET ERROR NUr«ER TO 4003. 

#eUFBAS.R2 I PASS THE START OF THE DATA PATTERN TO TX. 

♦100.. R3 iPASS THE LENGTH OF THL DATA PATTERN. 

PC.OOONA I TRANSMIT THE DATA PATTERN. 

12$ iGO REPORT ER.^0fl IF DMA.START BIT SET. 



INC 
MOV 
MOV 
JSR 
BCC 

I TEST THE STATE OF THE DMA.START BIT ON THE LINE UNDER TEST, 
I REPORT ERROR IF DMA.START BIT IS CLEAR. 

» - 



INC ERRNBR 

MOV R1.8CSRA 

TSTB BTXAD2A 

BPL 12$ 



t INCREMENT ERROR NUMBER TO 4004. 
J SELECT THE LINE CURRENTLY UNDER TEST. 
I TEST THE STATE OF THE OKA.STA^T BIT, 
I GO REPORT ERROR IF BIT IS CLcAR. 



t < 



i WAIT FOR DMA TRANSMISSION TO COMPLETE. 



; - 

INC 

MOV 

MOV 

HOV 
JSR 
BCC 

MOV 
JSR 

MOV 

! TEST THE STATE OF T»C DMA.START BIT ON T»C LINE UNDER TEST. 
I REPORT ERROR If ONA.START BIT IS SET. 



ERRNBR {INCREMENT ERROR NUMBER TO 4005. 

Rl.RS I SAVE THE LINE NUMBER. 

♦1 70226. Rl I TEST BIT 15. TIMEOUT OF 150 MILL! SECS. 

CSRA.A2 iPASS THE ADDRESS OF THE REGISTER TO TEST. 

PC.UAIBIS I WAIT FOR DMA TO COMPLETE. 

lOt iGO REPORT ERROR IF TIMEOUT OCCURRED. 

*5.R4 iPASS DELAY OF 5 MILLI SECS. 

PC.OELAY lUAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 

RS.Rl (RESTORE T»C CURRENT LINE NUrSER. 



INC ERR»«R 

MOV Rl.aCSRA 

TSTB 8TXA02A 

BHI 121 



I INCREMENT ERROR NUTQER TO 4006. 
I SELECT THE LINE CURRENTLY UM>ER TEST. 
•TEST THE STATE OF T»C DMA.START BIT. 
iGO REPORT ERROR IF BIT IS STILL SET. 



I VERIFY T»C NUMBER OF CHARS RECEIVED - NUMBER OF CHARS EXPECTED, 
t REPORT ERROR IF COUNT IS INCORRECT. 

I IF MORE THAN 12B BMP COOES ARE FOUND THEN REPORT ERROR AND EXIT TEST. 



CLR *M 

MOV ♦12a..R4 

MOV MOOT. .ERRNBR 

HOV flRBUFA.R2 

BPL 12« 

MOV «170S01.R0 

BIC R2.R0 

BNE at 

INC ERRNBR 

JSR PC.SAVBMP 

DEC R4 

BEQ SO* 

BR 61 

INC R3 

CMP R3»*100. 

BLT 61 



taEAR THE READ COUNTER. 

tSET UP MAX 8t» CODE READ COUNT. 

{SET ERROR NUMBER TO 4007. 

iREAO THE CHARACTER FROM THE FIFO. 

iGO REPORT ERROR IF FIFO EHPTY TOO SOON. 

iSCT-UP BIT HASK OF A BM* CODE. 

iTRY TO CLEW THE BHP CODE MASK. 

{BRANCH IF NOT A BMP CODE. 

{INCREMENT ERROR NUMBER TO 4008. 

{SAVE THE B(9 COOC ON THE QUEUE. 

(DECREMENT HAX BMP CODE READ COUNT. 

iGO REPORT ERROR IF TOO MANY BMP COOES FOUND. 

{DO NOT COUNT THE BMP CODE AS A VALID CHAR. 

(COUNT THIS CHARACTER. 

(HAVE UE RECIEVEO 100 CHARACTERS?. 

(LOOP UNTIL 100 (NON-BMP) CHARS ARE READ. 



CZDHVBO OMC 
HARDWARE TES 
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SEQ IM 



5101 
5102 
5103 
5104 
S105 
5106 
510'^ 
S108 
5109 
5110 

5J11 
5112 
5115 
5114 
5115 
5116 
5117 
5116 
5119 
5120 
5121 
5122 
5123 
5124 
5125 
5126 



021644 000410 



021646 

021650 

021654 
021654 



021656 
021664 

021666 
021670 
021672 
021674 

021676 
021702 

021706 
021706 
021706 



010301 

012702 005435 
104460 



032767 000100 160324 
001406 

005201 
005705 
001255 
000402 

004767 174770 
005067 160342 



104401 



10$; 
12$: 



BR 14$ iSKiP AROUND THE ERROR REPORT. 

I REPORT ERROR, SKIP FURTHER TESTING ON THIS LINE. 

MOV R3.R1 sRESTORE THE CURRENT LINE NUMBER. 

MOV «EM4002,R2 tPASS THE ERROR MESSAGE TO BE REPORTED. 

I ^'DiA^START BIT BAD ON LINE NN". 
ERROR I >>>>> ERROR <<<<<. 

TRAP C$ERR0R 

I'exIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



14$: 



50$: 
60$: 



BIT «6IT06.0PTI0N 

BEQ 60$ 

INC Rl 

TST R5 

BNE 2$ 

BR 60$ 



JSR 
CLR 

ENDTST 



PC.TSA6RT 
CTRLCr 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{INCREMENT THE LINE NUMBER COUNTER. 

I ARE THERE ANY MORE ACTIVE LINES TO TEST?. 

fYESi BRANCH TO TEST THE NfXT LINE. 

iNOs EXIT THIS TEST, 

{REPORT TEST ABORTED. NGN- TEST RELATED ERROR. 
{INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10027: 



TRAP 



C$ETST 



CZOHVBO 
HARDWARE 

5128 
5129 
5130 
5131 
5132 
5133 
5134 
5135 
5136 



TES 



Ll TUNC TbT 
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10 r 



SEO 139 



SBTTL HARDWARE TEST 



DMABRT * 



5137 








5158 


021710 
021710 






5139 


021710 








021710 


012700 


000240 




021714 


104441 




5140 




000003 




5141 


021716 


012767 


000003 


5142 


021724 


012767 


177777 


5143 


021732 


012767 


000001 


5144 


021740 


012767 


010005 


5145 


021746 


012767 


005471 


5146 


021754 


012767 


013136 


5147 








5148 








5149 








5150 








5151 








5152 


021762 


004767 


172230 


5153 


021766 


103164 




5154 








5155 


021770 


004767 


172554 


5156 








5157 








5158 








5159 








5160 








5161 








5162 


021774 


016705 


160220 


5163 


022000 


012700 


000204 


5164 


022004 


004767 


175542 


5165 


022010 


012700 


177670 


5166 


022014 


004767 


175562 


5167 


022020 


004767 


175076 


5168 








5169 








5170 








5171 


022024 


016705 


160170 


5172 


022030 


005001 




5173 


022032 


012767 


010006 


5174 


022040 


000241 




5175 


022042 


006005 




5176 


022044 


103127 




5177 


022046 


004767 


173316 


5178 


022052 


103130 




5179 








5180 








5181 









- DMA ABORT/RESTART TEST - 
THIS TEST VERIFIES THAT EACH OMA.ABORT BIT WILL CORRECTLY HALT 
A DMA TRANSMISSION. AND RETURN A TX.ACTION. 

IT WILL ALSO VERIFY THAT THE ABORTED DHA TRANSMISSION CAN BE RESUMMED. 

AND THAT A TX.ACTION IS NETURNED UPON COMPLETION. 

THIS TEST IS PERFORMED IN INTERNAL LOOPBACK. ON ALL ACTIVE LINES. 



160330 
160316 
162110 
162104 
162100 
162074 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRI05 



• TNUM * 1 
•TNUM. TS TNUM 
♦-I.CTRLCF 
•l.ERRTYP 
•4101..ERRNBR 
•EmiOl.ERRMSG 
•ER9101.ERRBLK 



T3' • 

lALLOU LTC INTERRUPTS. 

MOV 4PRI05.R0 
TRAP C*SPRI 

•INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

(SET UP THE TEST NUMBER. (41) 

t INDICATE THAT UE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

tSET THE FIRST ERROR NUMBER IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERRTBL. 

{SELECT THE CORRECT ERROR REPORTING ROUTINE. 



t RESET THE OUT TO A KMMN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
: CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
> THIS SUBROUTINE REPORTS ERROR >>>>> 4101 ««<. 

' JSR PC.CLNRST lAESET THE OHU-11. REPORT ANY ERRORS FOUM). 

BCC 601 tRESET FAILURE?. ABORT THIS TEST. 

JSR PC.INOATP {INITIALISE 256 BYTE DATA PATTERN. 

SET INTERNAL LOOPBACK .ENABLE RECEIVER FUNCTIONS ON ALL ACTIVE LDCS. 
SET LPR ON ALL LINES TO 58. 4K BAUD. 8 BITS PER CHARACTER. ODD PARITY. 
2 STOP BITS. 

ENABLE TRANSMITTERS ON ALL ACTIVE LINES. 



MOV 
MOV 
JSR 

MOV 
JSR 
JSR 



ACTLNS.R5 

•204.ro 

PC.UTULNC 

n77670.R0 

PC.UTULPR 

PC.TXENBL 



{PASS T»C ACTIVE LIIC BIT 
iPASS THE LNCTRL CONTENTS. 
{INITIALISE THE LNCTRL REGISTERS. 
{PASS THE LPR CONTENTS. 

(INITXALSE THE LPR REGISTERS ON ALL LINES. 
{ENABLE TRANSMITTERS ON ALL LINES. 



PERFORM OMA.ABORT BIT TESTING ON EACH INDIVIDUAL C ACTIVE) LINE. 



162012 2t : 



MOV ACTLNS.RS 

CLR RI 

MOV •4102..ERRNBR 

ac 

ROR R5 

BCC 101 

JSR PC.PUFIFO 

BCC 50$ 



{GET THE ACTIVE LINE BIT MAP. 

(CLEAR THE LINE NUMBER COUNTER. 

tSET THE ERROR NUMBER TO 4102. 

(CLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 

(SHIFT THE BIT MAP INTO THE CARRY BIT. 

(DO NOT TEST THE LINE IF IT IS INACTIVE. 

(PURGE THE FIFO. 

(GO REPORT ERROR IF FIFO UILL NOT aEAR. 



( ♦ 
( 

( - 



CHECK THE OMA.ABORT BIT BEFORE ENABLING DMA. REPORT ERROR IF SET. 



CZOHVBO OHU-11 FUNC TST PART2 
HARDWARE TEST 



OMABRT 



MACRO H1200 







AASPIi7 


1 Al 77P 
XOX r r C 






A1 A1 77 
vXVX ff ' 


1 AA14P 






A^P777 


AAAAA1 


^1 A^ 


0PP07P 


AA1 1 AS 




^1 A A 








^1 A7 








AA 








■\1 AQ 








^1 on 


0PP07d 


AASP67 


161 7SP 

XwX ff 


*>1 Q1 


nppi AO 


Al P7AP 
vxc f Vc 


AAP6SA 


^X 7C 


OPPI AA 


Al P7A^ 
vXC ' v<9 


AAA4AA 


i^X 


APP1 1 A 
vcc X XV 


AA47#;7 


1 7PP64 


■^1 OA 
jXTH 


APP 114 
Ucc X X^ 


1 A'^1 A7 




DX 








SI OA 

^X 7T> 








S1Q7 

JX 7 » 








JX 70 


APP \\f% 

VCC X Xw 


A10177 

VXwX * ■ 


160104 


S19Q 


Appipp 
wcc xcc 


012704 


000050 




APPIPP 
VCc X^w 


A04767 


172130 

X • C X «7V 




APPl ^P 


OS2777 


000001 


























5P0S 


APPl 4 A 


OOSP67 


161706 

XwX ■ W 




APP 144 


010103 




r 


APP14A 


A1P7A1 

vXc » VX 


1 7AA1P 
X ' wxc 


SPAA 


APPl SP 


A167AP 

VXw r 


16AAS0 




APP1SA 
vcc X30 


AA4767 


1 7SPS4 




APP 1 AP 
xoc 


1 AKASA 






APP1I%4 


Al AW1 
vxv jvx 




SPIP 
























■/c x^ 


APPl 


AASP67 


16166A 




APPl 7P 


A1P7AP 

VXC r VC 


AASSS7 


SP1 7 

^CX ' 








m^€m XO 


APPl 7A 


Al Al 77 

wXwX f f 


16AAP4 


X 7 


APPPAP 


1AS777 
Xw^ r ff r 


16AA'U 


5220 


022206 


100441 

XV^^t"» X 




5PP1 








SPPP 








SPP3 










0222 lO 


04P777 

fit 


OOOOOl 




022216 


OS2777 


AOAPAA 


5226 








5227 
















5229 


022224 


005267 

W ff 


1616P2 


52 So 


022230 


010103 




5231 


022232 


012701 

wXC > wX 


1 70S 36 

X ff 


5232 


022236 


016702 

W X w ff >/d 


157764 

X^ r • 


5233 


022242 


004767 

Vli^^ ff \* ff 


175170 

X ■ ^ X • w 


5234 


022246 


103016 




5235 


022250 


012704 


000002 


5236 


022254 


004767 


172002 


5237 


022260 


010301 




5238 
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INC ERRNBR 

MOV R1.8CSRA 

BIT «BITO.SLNCTRA 

BNE 6( 



I INCREMENT ERROR NUMBER TO 4103. 
I SELECT THE LINE CURRENTLY UNDER TEST. 
I TEST THE STATE OF THE OMA.ABORT BIT. 
iGO REPORT ERROR IF BIT IS SET. 



ENABLE DMA TX ON SELECTED LINE. WAIT FOR DMA TO TX APPROX 1/4 OF DATA. 
ABORT THE DMA TRANSMISSION. WAIT FOR TX.ACTION TO BE RETURNED. 



MOV 
MOV 
JSR 
BIS 



ERRNBR 
«BUFBAS.R2 
*256. .R3 
PC.DODMA 
501 



Rl.SCSRA 
»40. .R4 
PC. DELAY 
•BIT0.8LNCTRA 



{SET ERROR NUMBER TO 4104. 
iPASS THE START OF THE DATA PATTERN TO TX. 
I PASS THE LENGTH OF THE DATA PATTERN. 
{TRANSMIT THE DATA PATTERN. 
I GO REPORT ERROR IF THERE ARE TX PROBLEMS. 



INC 
MOV 
MOV 
JSR 
BCC 

TuAIT FOR DMA TO TRANSMIT 1/4 OF THE DATA BEFORE ABORTING. 

* " iSELECT THE LINE CURRENTLY UNDER TEST. 

I PASS THE DELAY TIME OF 40 MILLI SECONDS 
lUAIT FOR APPROX 1/4 OF DATA TO BE TX'O. 
{ABORT THE DMA TRANSMISSION. 



i ♦ 



WAIT FOR TX.ACTION TO BE RETURNED. REPORT ERROR IF TIME-OUT OCCURS. 

{INCREMENT ERROR NUMBER TO 4105. 
(SAVE THE LINE NUMBER. 
{TEST BIT 15. TIMEOUT OF 10 MILLI SECS. 
{PASS THE ADDRESS OF THE REGISTER TO TEST. 
(UAIT FOR DMA TO COMPLETE. 
(GO REPORT ERROR IF TIMEOUT OCCURRED. 
(RESTORE THE CURRENT LINE NUMBER. 



( - 

INC 


ERRNBR 


MOV 


R1.R3 


MOV 


♦1 70012. Rl 


MOV 


CSRA.R2 


JSR 


PC.UAIBIS 


BCC 


4t 


MOV 


R3.R1 


VERIFY OHA.START BIT 


INC 


ERRNBR 


MOV 


«emio3.R2 


MOV 


Rl.BCSRA 


TSTB 


aTXAD2A 


BMI 


8« 



(INCREMENT ERROR NUMBER TO 4106. 
(SELECT MESSAGE TO BE REPORTED. 
( "OHA.START BIT FOUND SET AFTER DMA ABORTED 
(SELECT THE LINE CURRENTLY UNDER TEST. 
(TEST THE STATE OF THE OHA.START BIT. 
tGO REPORT ERROR IF IT IS SET. 

'resume DMA TfMNSniSSXON 8Y CLEMIIHG OHA.MORT AMD SETTING OHA.START. 



6IC 
BIS 

( ♦ 

( UAIT 

t - 

INC 
MOV 
MOV 
MOV 

JSR 

BCC 
MOV 

JSR 
MOV 



•6IT0.8LNCTRA 
•eiT7.8TXA02A 



(CLEAR T»C OHA.ABQRT BIT. 
(SET THE OHA.START BIT. 



FOR DMA TRANSMISSION TO COMPLETE. 

ERRNBR (INCRENENT ERROR NUI«ER TO 4107. 

Rl.RS (SAVE THE LINE IWHBER. 

#170536. Rl (TEST BIT IS. TIHEOUT OF SSO HILLI SECS. 

CSRA.R2 (PASS TIC ADDRESS OF THE REGISTER TO TEST. 

PC.UAIBIS (UAIT FOR OHA TO COMPLETE. 

4t tGO REPORT ERROR IF TIMEOUT OCCURRED. 

♦2,R4 (PASS TIME-OUT OF 2 MILLI SECS. 

PC. DELAY (UAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 

R3.R1 (RESTORE THE CURRENT LINE NUMBER. 
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Ucccoc 


AA^3^7 






A1 A1 "77 


^OAA 


yjc.dc, fc 


U^C f f f 






AA1 AA3 






A AAA 1 A 


KOA7 






^OAA 














Ucc^U^ 


A1 ATA1 










Ucc^vO 


A1 37A3 
Ulc f Uc 










ft33Xl 3 
V/CC<3lc 






ft33Xl 3 
















f 
















AX37A7 
U3c r O / 




A3 3X33 


AA1 AAI% 


























3c O 3 


A33Y3A 


AAi^3A1 


3cOO 


n33X3J^ 


AA^7A*^ 
VU3 r V/3 


3cO r 


A33XXA 
vccOdv 


AAl 3AA 


3cOO 


A331X3 


AAAAA3 


5269 








A33X^ 


AAA 74^7 


5271 


022340 




5272 






52''3 


022344 
022344 






022344 


104401 



OHABRT 



Lll 

PAGE 107-2 



SFQ 141 



161564 
157734 
000001 



TEST THE STATE OF THE 0MA.A80RT BIT ON THE LINE UNDER TEST, 
REPORT ERROR IF DMA.ABORT BIT IS SET. 



157736 



ERRN8R 

Rl.SCSRA 

«BITO.SLNCTRA 

6» 

10 1 



t INCREMENT ERROR NUMBER TO 4108. 
t SELECT THE LINE CURRENTLY UNDER TEST, 
I TEST IHE STATE OF THE OhA.ABORT BIT. 
iGO REPORT ERROR IF BIT IS SET. 
iBRANCH TO CHECK FOR ANY MORE LINES TO TEST. 



005523 



41 

6$ 
8« 



INC 
MOV 
BIT 
ONE 
BR 

! REPORT ERROR. SKIP FURTHER TESTING ON THIS LINE. 

' MOV R3.R1 (RESTORE THE CURRENT LINE NUMBER. 

MOV «EM4102.R2 iPASS THE ERROR MESSAGE TO BE REPORTED. 

I "OHA.ABORT BIT BAD ON LINE NN". 
ERROR I >>>>> ERROR <<<<<. 

TRAP 



C$ ERROR 



000100 157666 



! EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

' BIT •BIT06. OPTION lEXIT WITH TEST FAILURE MESSAGE IF 

BEQ 60t tNO EXTENDED ^RROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

I VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 

101: 



174332 
157704 



sot: 
601: 



INC 

TST 
BNE 
PR 

JSR 
CLR 

ENDTST 



Rl (INCREMENT THE LINE NUMBER COUNTER. 

R5 I ARE THERE ANY MORE ACTIVE LINES TO TEST?. 

2$ lYESi BRANCH TO TEST THE NEXT LINE. 

60< iNOi EXIT THIS TEST. 

PC.TSABRT (REPORT TEST ABORTED. NON-TEST RELATED ERROR. 

CTRLCF (INDICATE THAT WE ARE NOT UITHIN A TEST. 



L 10030: 



TRAP 



C»ETST 



Mil 



CZDHVBO DHU 
HAROUARE ~ 



TES1 



5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5285 
5264 
5285 
5286 
5287 
5288 

5289 
5290 



5291 
5292 
5293 
5294 
5295 
5296 
5297 
5296 
5299 
5300 
5301 
5302 
5303 
5304 
5305 
5306 
5307 
5306 
5309 
5310 
5311 
5312 
5313 
5314 
5315 
5316 
5317 
5318 
5319 
5320 
5321 
5322 
5323 
5324 
5325 
5326 
5327 
5326 
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022426 
022432 
022434 
022436 
022442 
022446 
022452 
022456 



022462 
022466 
022474 



SEQ 142 



022346 
022346 

022346 
022346 
022352 



022354 
022362 
022370 
022376 
022404 
022412 



022420 
022424 



- OMAERR - 



012700 
104441 

000004 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103120 



004767 
103115 
010104 
012700 
004767 
012700 
004767 
004767 



005267 
032777 
001072 



000240 



000004 
177777 
000001 
010151 
005643 
011762 



171572 



157672 
157660 
161452 
161446 
161442 
161436 



172036 



000204 
175104 
177670 
175124 
174440 



161364 
000200 



157546 



»♦ 
«♦ 
I* 
I* 
»* 
J* 
t* 
»• 
s* 
J - - 



************4>*****4i ********************* ************ ****4i** ****** 

- DMA ERROR BIT TEST - 
THIS TEST VERIFIES THAT THE TX. DMA, ERROR BIT IN THE CSR IS 
FUNCTIONING CORRECTLY. THE DMA ERROR IS FORCED BY MAKING THE OUT 
ATTEMPT TO PERFORM A DMA TRANSFER FROM THE ADDRESS OF ITS OWN CSR. 
SINCE THE DEVICE CANNOT BE BOTH A BUS MASTER AND SLAVE AT THE SAME 
TIME. TIMEOUT WILL OCCUR WAITING FOR THE APPROPRIATE HANDSHAKE SIGNAL 
FROM THE DMA ADDRESS. 

THIS TEST IS PERFORMED IN INTERNAL LOOPBACK. 
************************************************************************** 



BGNTST 



SETPRI «PRI05 



TNUM " TNUM ♦ 1 

MOV ♦TNUH.TSTNUM 

MOV ♦-1.CTRLCF 

MOV tl.ERRTYP 

MOV «4201..ERRNBR 

MOV •emZOl.ERRMSG 

HOV «ER0S03.ERRBLK 



T4: 



(ALLOW LTC INTERRUPTS. 



MOV 
TRAP 



4PRI05.R0 
CtSPRI 



I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET ur THE TEST NUMBER. (42) 

I INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

tSET ERROR MESSAGE ADDRESS IN ERRTBL. 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE rIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >»» 4201 <<<«. 



JSR 
BCC 



PC.CLNRST 
60t 



tRESET THE DHU-ll. REPORT ANY ERRORS FOUND. 
(RESET FAILURE?. ABORT THIS TEST. 



SET INTERNAL LOOPBACK. ENABLE RECEIVER FUNCTIONS ON ALL LINES. 

SET LPR ON ALL LINES TO 38.4K BAUD. 6 BITS PER CHARACTER. ODD PARITY. 

2 STOP BITS. 

ENABLE TRANSHITTERS ON ALL LINES. 

JSR PC.FINACT jFIND AN ACTIVE LINE. 

BCC 60t (EXIT THE TEST IF NO ACTIVE LINES. 

MOV R1.R4 tSAVE THE LINE NUMBER. 

MOV *204.R0 (PASS THE LNCTRL CONTENTS. 

JSR PC.UTULNC (INITIALISE THE LNCTRL REGISTERS. 

MOV #177670. RO (PASS THE LPR CONTENTS. 

JSR PC.WTULPR jINITIALSE THE LPR REGISTERS ON THE ACTIVE LINE. 

JSR PC.TXENBL (ENABLE TRANSMITTERS ON THE ACTIVE LINE. 



VERIFY THAT THE DMA. START BIT IS CLEAR BEFORE ATTEMPTING THE DMA TRANSFER. 



i - 



INC ERRNBR 
BIT «BIT07.8TXAD2A 
BNE 50 » 



(SET THE ERROR NUMBER TO 4202. 

(TEST THE DMA START BIT. 

(BRANCH TO REPORT THE ERROR IF THE BIT 



IS SET. 



SET UP THE DMA REGISTERS TO PERFORM THE TRANSFER FROM THE ADDRESS OF THE CSR. 





DHU 11 


TUNC TST 


PAH 12 




E TEST 




. OMAE 


5329 


022476 


016777 


157524 


5330 


022504 


012777 


000001 


5331 


022512 


112777 


000203 


5332 


022520 


012701 


170012 


5333 


022524 


016702 


157476 


5334 


022530 


005267 


161316 


5335 


022534 


004767 


174676 


5336 


022540 


103050 




5337 








5336 








5339 








5340 


022542 


005267 


161304 


5341 


022546 


032777 


010000 


5342 


022554 


001436 




5343 


022556 


005267 


161270 


5344 


022562 


032777 


000200 


5345 


022570 


001034 




5346 








5347 








5348 








5349 


022572 


010401 




5350 


022574 


012702 


002650 


5351 


022600 


012703 


000001 


5352 


022604 


005267 


161242 


5353 


022610 


004767 


171564 


5354 


022614 


103022 




5355 


022616 


012701 


170036 


5356 


022622 


016702 


157400 


5357 


022626 


005267 


161220 


5358 


022632 


004767 


174600 


5359 


022636 


103011 




5360 


022640 


005267 


161206 


5361 


022644 


032702 


010000 


5362 


022650 


001406 




5363 








5364 








5365 








5366 


022652 


012701 


005675 


5367 








5368 


022656 








022656 


104460 




5369 


022660 


000402 




5370 








5371 


022662 


004767 


174004 


5372 


022666 


005067 


157356 


5373 








5374 


022672 








022672 








022672 


104401 
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SEQ 14 5 



157534 
157552 
157522 



MOV CSRA.8TXAD1A 

MOV ♦l.QTXBFCA 

MOVB 0203.STXAD2A 

MOV *170012.R1 

MOV CSRApR2 

INC ERRNBR 

JSR PC.UAIBIS 

BCC 50$ 



I SET UP THE LOW 16 BITS OF THE DMA AODR. 

I SET UP TO DMA ONE CHARACTER. 

iSET UP THE 2 MSB'S AND INITIATE THE DMA. 

I TEST BIT 15, TIME OUT OF 10 MS. 

I INDICATE TO TEST THE CSR. 

I SET THE ERROR NUMBER TO 4203. 

iWAIT FOR A TX-ACTION. 

I REPORT THE ERROR IF NO TX« ACTION. 



VERIFY THAT THE DMA ERROR BIT IS SET AND THE DMA START BIT IS CLEAR. 



157452 
157452 



INC ERRNBR 

BIT MIT12.0CSRA 

BEQ 2$ 

INC ERRNBR 

BIT MIT07.0TXAD2A 

BNE 50$ 



;SET THE ERROR NUMBER TO 4204. 

I TEST THE DMA-ERROR BIT. 

» REPORT THE ERROR IF BIT IS CLEAR. 

tSET THE ERROR NUMBER TO 4205. 

I TEST THE DMA-START BIT. 

;REPORT THE ERROR IF THE BIT IS SET. 



VERIFY THAT THE DMA ERROR BIT CLEARS WHEN A "GOOD" DMA TRANSFER IS PERFORMED. 



21: 



50$: 
601: 



MOV 


R4.R1 


I SET UP THE ACTIVE LINE NUMBER 


MOV 


«6UFBAS.R2 


iSET UP THE START ADDRESS OF THE DMA BUFFER, 


MOV 


«1.R3 


;SET UP TO DMA ONE CHARACTER. 


INC 


ERRNBR 


;SET THE ERROR NUMBER TO 4206. 


JSR 


PC.OOOMA 


J START THE DMA. 


BCC 


50< 


(REPORT THE ERROR IF ONE OCCURED. 


MOV 


♦170036. Rl 


J SET UP TO TEST BIT 15 WITH TIMEOUT OF 30 MS. 


MOV 


CSRA.R2 


{INDICATE TO TEST THE CSR. 


irc 


ERRNBR 


(SET THE ERROR NUMBER TO 4207. 


JSR 


PC.UAIBIS 


5 WAIT FOR A TX -ACTION. 


BCC 


50 » 


(REPORT THE ERROR IF NO TX ACTION OCCURED. 


IHC 


ERRNBR 


(SET THE ERROR NUMBER TO 4208. 


BIT 


«6IT12.R2 


(TEST THE DMA ERROR BIT OF THE LAST CSR WORD READ 


BEQ 


60t 


(EXIT THF TEST IF THE BIT IS CLEAR. 


T THE 


ERROR. DMA ERROR 


BIT BAD. 


MOV 


«EM4202.R1 


iSET THE MESSAGE 






s "DMA ERROR BIT BAD". 


ERROR 








TRAP C$ERROR 


BR 


601 


(EXIT THE TEST. 


JSR 


PC.TSABRT 


{REPORT THE NON-RELATED TEST ERROR. 


aR 


CTRLCF 


(INDICATE THAT UE ARE NOT Ji.'fyZH A TEST. 



ENDTST 



L 10031: 



TRAP 



CJETST 
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S£0 144 



5376 
5577 
5578 
5579 
55«0 
5501 
556^ 
5505 
5504 
5505 
5506 
5507 

5500 
■^509 
5590 
5591 



5592 
5595 
5594 
5595 
5596 
5597 
5590 
5599 
5400 
5401 
5402 
5405 
5404 
5405 
5406 
5407 
5406 
5409 
•110 
5411 
5412 
5415 
5414 
5415 
5416 
5417 
5410 
5419 
5420 
5421 
5422 
5425 
5424 
5425 
5426 
5427 
5420 
5429 



022674 
022674 
022674 
022702 
022704 
022710 
022710 
022714 

022716 
022724 
022752 
022740 
022746 
022754 



022762 
022766 
022770 



025000 
02S004 
02S010 
025014 
025020 
025024 
025050 



025054 
025040 
025044 



.SSTTL 



TEUf 



OMjroi 



- GAUTO BIT INACTIVE TEST - 

THIS TEST VERIFIES THAT THE OUT'S GAUTO FUNCTION 8EHAVES COMCCTLT 
UMEN INACTIVE. IE GAUTO BIT CLEAR. 

THIS TEST MILL ONLT EXECUTE IF STAGGERED LGQPBACK HOOE IS SELECTED. 
TIC SPECIAL STAGGERED LO0P8ACK COMCCTOR MUST BE FITTED. 



126 '2 7 
001402 
000167 

012700 
104441 

000005 
012767 
012767 
012767 
012767 
012767 
012767 



157522 
000556 
000240 



000005 
177777 
000001 
011445 
005717 
015156 



000002 



004767 171250 
105402 

000167 000472 



022774 004767 170442 



016705 
012700 
004767 
012705 
012700 
004767 
004767 



012705 
016705 
046705 



157214 
000004 
174556 
177777 
177670 
174552 
174066 



100000 
157154 
157212 



157550 
157516 
161110 
161104 
161100 
161074 



BGNTST 

CHPB 
8E0 
JMP 
SETPRI 



TNUH 

MOV 

HOV 

NOV 

HOV 

HOV 

NOV 



L0P6CK.«2 

.•6 

60t 

4PRI05 



> TNUH * 1 
•TNUH. TS TNUH 
♦-l.CTRLCF 
•I.ERRTyP 
•4901..ERRNBR 
•Em901 .ERRHSG 
•ER9101.ERR8LK 



T5:: 

iCK_CK NODE SELECTED. 

lOO NOT EXIT IF STAGGERO LOPBCK HQDE SELECTED. 
lEXIT THIS TEST. 
lALLOU LTC INTERRUPTS. 

HOV •PRI05.ro 
TRAP CtSPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. (49) 

•INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET ERROR NUMBER TO 4901. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

tSELECT T»C CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOUN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 4901 <<<««. 



JSR 
BCS 
JMP 



PC.CLNRST 

.*6 

60t 



iRESET THE OHU-11. REPORT ANT ERRORS FOUND. 
lOO NOT EXIT IF RESET UAS SUCCESSFUL. 
{EXIT THIS TEST. 



SET UP THE ASSOCIATED TX/RX LINE NUHBER TABLES. 



JSR 



PC.ASLNTL 



{INITIALISE THE ASSOCIATED TX/RX TABLES. 



SET EXTERNAL LOOPBACK. DISABLE OAUTO AND ENABLE RECEIVER ON ALt ACTIVE LiNEb. 
SET LPR ON ALL LINES TO 50. «K BAUD. 6 BITS PER CHARACTER. 000 PARITY. 
2 STOP BITS. 

ENABLE TRANSMITTERS ON ALL LINES. 

HOV ACTLNS.R5 iPASS T»€ ACTIVE LINE BIT HAP. 

HOV •4.R0 iPASS THE LNCTRL CONTENTS. 

JSR PC.WTULNC {INITIALISE THE LNCTRL REGISTERS. 

HOV •HAPLNS.R5 iPASS BIT MAP OF ALL LINES. 

MOV •I 7 76 70, RO iPASS THE LPR CONTENTS. 

JSR PC.WTWLPR iINITIALSE THE LPR REGISTERS ON ALL LINES. 

JSR PC.TXENBL lENABLE TRANSMITTERS ON ALL LINES. 

SET UP OUTER LOOP FOR TESTING ACTIVE LINES IN BOTH LINE GROUPS. 

MOV •100000.R5 iSET-UP LOOP CONTROL FLAG. 

MOV ACTLNS.R5 iCET THE ACTIVE LINE BIT HAP. 

BIC LGRP2H.R5 iRCHOVE LINES IN GROUP 3, 



CJDmVBO Omu U fUNC TST PAPT2 MACPO mSOO 
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SCO 14*, 





025050 


010567 


AAA AAA 

000404 


5451 


025054 


005067 


000576 




025060 


016701 


AAAV 

OO0372 


5455 


025064 


000241 




5454 


025066 


006005 




5455 


025070 


105064 




5456 








5457 








5456 








5459 








5440 


025072 


012767 
01017 


A9 • AAA. 

011446 


5441 


025100 


« C7 9 

157122 


5442 


025104 


052777 


000020 


544 S 


025112 


001410 




5444 


025114 


012702 


005760 


5445 








5446 


025120 
025120 


104460 




544 7 








5448 








5449 








5450 








5451 


025122 


052767 


/\AA9 AA 


5452 


025150 


001556 




Saks 

5455 








5454 








5455 


025152 


000445 




5456 








5457 








5456 








5459 


025154 


116177 


004010 


5460 


025142 


112777 


AAAA*!! ■ 

000025 


5461 








5462 








5465 








5464 


025150 


005267 


« A AA 7A 

160676 


5465 


025154 


012701 


170012 


5466 


025160 


016702 


4 S ^ AA 

157042 


5467 


025164 


AAA 9^ ^ 

004767 


• ^ A '^A A 

174246 


5466 


025170 


« A V • VA 

105154 




5469 


025172 


A 9 1^ AA 

012704 


AAAAAC 

OOOOOt 


5470 


025176 


AAA 9 

004767 


9 9 9 AAA 

171060 


5471 
















54 f 5 








J# f # 








D4 f D 


025202 


005267 


9 A A^ A ^ 

160644 


54 76 


025206 


/\ 9 A 7 A 9 

016701 


AAA^A A 

000244 


p# f f 


025212 


010177 


9 C7A9 A 

157010 


P4 78 


02 5216 


A/\C 7 7 7 

005777 


9 C 7A<9A 

15 7020 


54 79 


025222 


100407 




p48g 


025224 


Al 9 7A<9 

012702 


AAC 7£.A 

005760 


5401 










0252 so 


104460 




5483 








5484 









MOV 
CLR 
MOV 

ac 

ROR 
BCC 



R5.45» 
40 » 
401 .Rl 

R5 
81 



I SAVE THE CURRENT LINE GROUP. 
I CLEAR THE LINE NUMBER COUNTER. 
I COPY THE LINE NUrVER. 

iCLEAR CARRY eiT PRIOR TO SHIFTING BIT MAP. 
ISHIFT ACTIVE LINE BIT MAP INTO CARk^T BIT. 
ISKIP TESTING THIS LINE IF IT IS INACTIVE. 



I TEST THE STATE OF THE OAUTO BIT ON THE LINE UNDER TEST. 

t REPORT ERROR IF IT IS FOUND SET. AND SKIP FURTHER TESTING OF THAT LINE, 



160752 
157124 



I - 



MOV 
MOV 
BIT 
BEQ 
MOV 

ERROR 



•4902..ERRNBR 
Rl.fiCSRA 
•eiT4.8LNCTRA 
61 

4EM4902.R2 



I SET THE ERROR NUMBER TO 4902. 

I SELECT THE LINE TO BE TESTED. 

I TEST THE STATE OF THE OAUTO BIT. 

I SKIP ERROR REPORT IF OAUTO BIT IS CLEAR. 

I PASS THE ERROR MESSAGE. 

I "OAUTO BIT BAD ON LINE NN" 

I > > > > > ERROR 44902 ««<<*. 

TRAP CIERROR 



157060 



TexIT the TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

* BIT •6IT06. OPTION jEXiT WITH TEST FAILURE MESSAGE IF 

BEQ 601 tNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

iDURING THE SOFTWARE QUESTIONS. 



BR 



81 



iSKIP FURTHER TESTING OF THIS LINE. 



157064 6t: 
1S7064 



TtRANSMIT the XOFF (ASCII DCS) ON THE ASSOCIATED LINE. 

' MOVB TXRLNBCRD.SCSRA iSELECT THE ASSOCIATED TX LINE. 

MOVB •25.iFDArA {TRANSMIT THE XOFF CHARACTER TO THE LUT. 

TwAIT FOR TRANSMISSION TO COMPLETE. 

' INC ERRNBA I INCREMENT ERROR N>J»eER TO 490S. 

MOV 4170012. Rl iTEST BIT 15. TIMEOUT OF 10 MILLI SECS. 

MOV CSRA.R2 (PASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.MAIBIS J WAIT FOR TRANSMISSION TO COMPLETE. 

BCC 50t I ABORT TEST IF TIMEOUT OCCURRED. 

MOV •S.R4 tPASS TIME-OUT OF 5 MILLI SECS. 

JSR PC.OELAT iWAir FOR CHAR TO BE RECEIVED AND PROCESSED. 

!*TEST THE STATE OF THE TX, ENABLE BIT ON THE LINE UNDER TEST, 
i REPORT ERROR IF TX.ENABLE BIT IS CLEAR. 

' INC ERRNBR {INCREMENT ERROR NUrSER TO 4904. 

MOV 40I.R1 iGET THE NUMBER OF THE LINE TEST. 

MOV Rl.SCSRA iSELECT THE LINE CURRENTLY UNDER TEST. 

TST 8TXAD2A iTEST THE STATE OF THE TX.EN^>JLE BIT. 

BMI 81 I SKIP ERROR REPORT IF BIT IS SET. 

MOV •EM4902.R2 (PASS THE MESSAGE TO BE REPORTED. 

t "OAUTO BIT BAD ON LINE NN". 
ERROR I >>>*> ERROR 44904 <<* 

TRAP 



C»£RROR 
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S4S5 






5486 






5467 02S2S2 


032767 


000100 


54M 023240 


001512 










5490 






5491 025242 


005267 


000210 


5492 025246 


005705 




5495 025250 


001305 




S494 






5495 






5496 






5497 025252 


016705 


000202 


5496 025256 


004767 


175544 


5499 025262 

5500 025266 


016705 


000172 


005067 


000164 


5501 025272 


012767 


011451 


5502 025500 


016701 


000152 


5505 025504 


000241 




5504 025306 


006005 




5505 0?5310 


103041 




5506 






5507 






5506 






5509 025312 


116177 


004010 


5510 025320 


112777 


000021 


5511 






5512 






5515 






5514 025526 


012701 


170012 


5515 025552 


016702 


156670 


5516 025556 


004767 


174074 


5517 025342 


103047 




5516 025544 


012704 


000005 


5519 025550 


004767 


170706 


5520 






5521 






5522 






5523 






5524 025354 


005267 


160472 


5525 025560 


016701 


000072 


5526 025564 


010177 


156636 


5527 025570 


005777 


156646 


5526 025574 


100007 




5529 025576 


012702 


005760 


5550 






5531 025402 






023402 


104460 




5532 






5555 






5554 






5555 






5536 023404 


032767 


000100 


5557 023412 


001425 




5556 






5539 






5540 025414 


00S267 


000036 



156750 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

*■ BIT 
BEO 



46IT06. OPTION 
601 



lEXlT UITH TEST FAILURE MESSAGE If 
iNO EXTENDED ERROR REPORTIfC HAS BEEN REQUESTED 
lOURING THE SOFTWARE QUESTIONS. 



INC 40t 
TST R5 
BNE 41 



I INCREMENT THE LINE NUMBER. 

I CHECK IP THERE ARE ANY MORE LINES TO 



TEST, 



t ♦ 



I DISABLE TRANSMITTERS ON THE SELECTED LINES IN THE CURRENT LINE GROUP. 



160552 101: 



MOV 451. R5 

JSR PC.TXDSBL 

MOV 451. R5 

CLR 401 

MOV M905..ERRNBR 

MOV 401. Rl 

CLC 

ROR R5 

6CC 121 



iRESTORE THE CURRENT LINE ACTIVE LINE GROUP. 
iDISABLE TRANSMITTERS ON THE SELECTED LINES. 
tGET THE CURRENT ACTIVE LINE GROUP AGAIN. 
I CLEAR THE LINE COUNTER. 
I SET ERROR NUMBER TO 4905. 
I COPY THE LINE NUMBER. 

I CLEAR CARRY BIT PRIOR TO SHIFTING BIT MAP. 
I SHIFT ACTIVE LINE BIT MAP INTO CARRY BIT. 
iSKIP TESTING THIS LINE IF IT IS INACTIVE. 



156706 
156706 



I ♦ 
I 

I - 



TRANSMIT THE XON (ASCII OCl) ON THE ASSOCIATED LINE. 



MOVB TXRLNBCRD.BCSRA sSELECT THE ASSOCIATED TX LINE. 
MOVB •21.8F0ATA i TRANSMIT THE XON CHARACTER TO THE LUT. 

TuAIT FOR TRANSMISSION TO COMPLETE. 

* MOV «170012.R1 iTEST BIT 15. TIMEOUT OF 10 MILLI SECS. 

MOV CSRA.R2 iPASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.UAIBIS I WAIT FOR TRANSMISSION TO COMPLETE. 

BCC sot I ABORT TEST IF TIMEOUT OCCURRED. 

MOV #5.R4 iPASS TIME-OUT OF 5 MiLLi SECS. 

JSR PC. DELAY iWAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 

TtEST THE STATE OF THE TX.ENABLE BIT ON THE LINE UNDER TEST. 
I REPORT ERROR IF TX.ENABLE BIT IS SET. 
I - 



156576 



INC ERRNBR i INCREMENT ERROR NUMBER TO 4906. 

MOV 401. Rl iGET THE NUMBER OF THE LINE UNDER TEST. 

NOV Rl.fiCSRA iSELECT THE LINE CURRENTLY UNDER TEST. 

TST 8TXA02A iTEST THE STATE OF THE TX.ENABLE BIT. 

BPL 12t iSKiP ERROR REPORT IF BIT IS CLEAR. 

MOV «EM4902.R2 iPASS THE MESSAGE TO BE REPORTED. 

I "OAUTO BIT BAD ON LINE NN". 
ERROR I >>>>> ERROR #4906 <<<<<. 

TRAP CSERROR 

IexIT the TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

' BIT «BIT06, OPTION lEXlT WITH TEST FAILURE MESSAGE IF 

BEQ 60* iNO EXTENDED ERROR REPORTING HAS BEEN REQCCSTEO 

{DURING THE SOFTWARE QUESTIONS. 



I2t, 



INC 



40t 



I INCREMENT THE LINE NUMBER. 



1 TUNC TST PAgr2^^, 
OAUTOI 
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5541 02S420 


005705 




5542 025422 


0C1323 




5543 






5544 






5545 






5546 






5547 






5548 023424 


005703 




5549 023426 


001417 




5550 023430 


005003 




5551 023452 


012705 


177777 


5552 023436 


004767 


175460 


5553 023442 


016705 


156552 


5554 023446 


0467C5 


156606 


5555 023452 


000167 


177372 


5556 






5557 023456 


000000 




5558 023460 


000000 




5559 023462 


004767 


173204 


3560 023466 


005067 


156556 


5561 






5562 023472 






023472 






023472 


104401 





TST 
BNE 



R5 
10» 



tCHECK IF THERE ARE <\NY MORE LINES TO TEST. 
I 



CHECK LOOP CONTROL Fi AG TO DETERMINE IF BOTH SETS OF LINES HAVE BEEN TESTED 
IF THIS IS THE FIST TIME AROUND, RE-ENABLE TX ON ALL LINES. GENERATE ACTIVE 
BIT MAP FOR SECOND LINE GROUP. 



40 » 
45t 
50* 
60 » 



TST 
BEQ 

CLR 

MOV 
JSR 

MOV 

BIC 

.WORD 
.WORD 
JSR 
CLR 

ENOTST 



R3 iHAVE BOTH LINE GROUPS BEEN TESTED?. 

60$ J YES J THEN CXIT THIS TEST. 

R3 iNOi CLCAR THE LOOP CONTROL FLAG» 

♦MAPLNS.R5 jPASS THE BIT MAP OF ALL AVAILABLE LINE. 

PC.TXENBL s RE -ENABLE TRANSMISSION ON ALL LINES. 

ACTLNS.RS jGET THE ACTIVE LINE BIT MAP. 

LGRPIM.R5 iREMOVE ALL ACTIVE LINES IN GROUP I. 

2i sONCE MORE AROUND AND WE ARE DONE. 

0 {STORAGE FOR CURRENT LINE NUWEP. 

0 r STORAGE FOR CURRENT ACTIVE LINE BIT MAP. 

PC.TSABRT {REPORT TEST ABORTED. NON TEST RELATFD ERROR. 

CTRLCF t INDICATE THAT UE APE NOT WITHIN A TEST. 



L 10032: 



TRAP 



CIETST 



TUNC TST 



TOI 
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5564 

5565 
5566 
5567 
5568 
5569 
5570 
5571 
!>572 
5575 
5574 
5575 
5576 

5577 
5578 
5579 
5500 



5581 
5582 
5583 
5584 
5585 
5586 
5587 
5588 
5589 
5590 
5591 
5592 
5595 
5594 
5595 
5596 
5597 
5598 
5599 
5600 
5601 
5602 
5605 
5604 
5605 
5606 
5607 
5608 
5609 
5610 
5611 
5612 
5613 
5614 
5615 
5616 
5617 



025474 
025474 

025474 
025502 
025504 
025510 
025510 
025514 

023516 
025S24 
025552 
025540 
025546 
025554 



023562 
023566 
023570 



126727 
001402 
000167 

012700 
104441 

000006 
012767 
012767 
012767 
012767 
012767 
Ol27o7 



004767 
103402 
000167 



BTTL 



HARDWARE TEST 



- OAUTOA - 
OAUTO BIT ACTIVE TEST 



THIS TEST VERIFIES THAT THE OCT'S OAUTO FUNCTION BEHAVES CORRECTLr 
UHEN ACTIVE. IE OAUTO BIT ASSERTED HIGH. 

THIS TEST WILL ONLY EXECUTE IF THE STAGGERED LOOPBACK HOOE IS SELECTED. 
THE SPECIAL STAGGERED LOOPBACK CONNECTOR MUST BE FITTED. 



156522 
00055t> 
000240 



000006 
177777 
000001 
011611 
006012 
015156 



170450 
000472 



000002 



023574 004767 167642 



023600 
023604 
023610 
023614 

023620 
023624 
023650 



023634 
023640 



016705 
012700 
004767 
012705 
012700 
004767 
004767 



012703 
016705 



156414 
000024 
175736 
177777 
177670 
175752 
173266 



160000 
156554 



156530 
156516 
160510 
160504 
160500 
160274 



BGNTST 

CMPB LGPBCK.«2 
BEQ *6 

JHP 601 

SETPRI tPRIOS 



TNUn » TNUH » 1 

NOV •TNUN.TSTNUn 

nOV •-1.CTRLCF 

NOV ALEflRTYP 

NOV •5001..ERRNBR 

NOV •EHSOOl.ERRflSC 

nOV •ER9101.ERR8LK 



To * * 

iCHECK nODE SELECTED. 

tDO NOT EXIT IF STAGGERD L0P6CK MODE SELECTED. 
lEXIT THIS TEST. 
lALLOU LTC INTERRUPTS. 

MOV •PRIOS.RO 
TRAP CISPRI 

i INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

tSE7 UP THE TEST NUMBER. (50) 

I INDICATE THAT UE ARE IN A TEST. 

tSET ERROR TYPE AS FATAL IN ERROR TABLE. 

tSET ERROR NUWER TO 5001. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

{SELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT fO A KNOUN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >»» 5001 <<<<<. 

JSR PC.CLNRST {RESET THE OHUll. REPORT ANY ERRORS FOUND. 

BCS .*6 iDO NOT EXIT IF RESET IMS SUCCESSFUL. 

JMP 601 lEXlT THIS TEST. 



SET UP THE ASSOCIATED TX/RX LINE NUMBER TABLES. 



( ■ 



JSR 



PC.ASLNTL 



{INITIALISE THE ASSXIATED TX/RX TABLES. 



SET EXTERNAL LOOPBACK .ENABLE OAUTO AND RECEIVER FUNCTIONS ON ALL ACTIVE LI»CS 
SET LPR ON ALL LINES TO 38.4K BAUD. 8 BITS PER CHARACTER. 000 PARITY. 
2 STOP BITS. 

ENABLE TRANSMITTERS ON ALL LINES. 

MOV ACTLNS.ftS {PASS THE ACTIVE LINE BIT MAP. 

MOV #24. RO {PASS THE LNCTRL CONTENTS. 

JSR PC.UTULNC {INITIALISE TIC LNCTRL REGISTERS. 

MOV AMAPLNS.RS {PASS BIT MAP OF ALL LINES. 

MOV •177670.R0 {PASS TMF LPR CONTENTS. 

JSR PC.MTMLPR tINITIALSE THE LPR REGISTERS ON ALL LINES. 

JSR PC.TXENBL (ENABLE TRANSMITTERS ON ALL LINES. 

SET UP OUTEA LOOP FOR TESTING ACTIVE LINES IN BOTH LINE GROUPS. 

MOV MOOOOO.RS I SET -UP LOOP CONTROL FLAG. 

MOV ACTLNS.R5 iGeT THE ACTIVE LINE BIT MAP. 



OAUTOA 
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SEO 140 







04670S 


1564 IP 

A -JV^ AC 


JO 


\/C<J\9 JV 


010Sfc7 

VAX/ W%9 1 


0OO404 




OP 36 54 


005067 


000376 




wC 


01 A701 


00037P 






OOOP41 








OO^OO^ 

VWW.J 




























5^? 7 








■JVC V 








JVC 7 


0P36 7P 


01P767 


011612 

V A AW AC 




OP3700 


010177 


156322 


5631 


023704 


032777 


000020 




OP371P 


OOlOlO 






023714 


012702 


005760 










S63S 


OP37PO 
OPS 7^ 


104460 




S636 

JV 








S637 








5638 








5639 








S640 


OP37PP 

wC«^ ' cc 


03P767 


OOOlOO 

www A WW 


S641 


0P3730 


001556 




S64P 








5643 








5644 

^^^^^ 


0P373P 

VC ■ ^c 


000443 




5645 

^^^^ J 








5646 








5647 

^^^^ f 








5646 


023734 


116177 


004010 


5649 


023742 


11P777 


000023 

ww^#wc 


5650 








5651 








5652 








5653 


023750 


005267 


160076 

AwWW ' W 


5654 


023754 


01P701 

VAC ' v A 


17001P 

A ■ WW AC 


5655 


023 760 


016 70P 

w A V • wC 


156P4P 

A«#WC^C 


5656 


0P3764 


004767 


17^46 


5657 


023770 


103134 

A A 




565A 


0P377P 


01P704 

w AC ' 


000005 

www J 


561>9 


023776 


004767 


170260 

A ' WCwW 


5660 








5661 








5662 








5663 










024002 


005267 


160044 


5665 


024006 


016701 


000244 


5666 


024012 


010177 


156210 

A^WC AW 


5667 


024016 


005777 


156220 


5668 


024022 


100007 




5669 


024024 


012702 


00S760 


5670 








5671 


024030 
024030 


104460 




5672 









160152 
156324 



BIC LGRP2M.R5 i REMOVE LINES IN GROUP 2. 

2»: MOV R5.45I iSAVE THE CURRENT LINE GROUP. 

CLR 40 1 I CLEAR THE LINE NUMBER COUNTER. 

4$: MOV 401, Rl iCOPY THE LINE NUMBER. 

CLC iCLEAR CARRY BIT PRIOR TO SHIFTING BIT MAP, 

ROR R5 I SHIFT ACTIVE LINE BIT MAP INTO CARRf BIT, 

see 81 iSKIP TESTING THIS LINE IF IT IS INACTIVE. 

I* TEST THE STATE OF THE OAUTO BIT ON THE LINE UNDER TEST. 

I REPORT ERROR IF IT IS FOUND CLEAR, AND SKIP FURTHER TESTING OF THAT LINE. 

* iSET THE ERROR NUMBER TO 5002. 

•SELECT THE LINE TO BE TESTED. 
I TEST THE STATE OF THE OAUTO BIT. 
I SKIP ERROR REPORT If OAUTO BIT IS SET. 
iPASS THE ERROR MESSAGE. 
I "OAUTO BIT BAD ON LINE m" 
I > > > > > ERROR #5002 <<<<<, 

TRAP CtERROR 



MOV 
MOV 
BlT 
BNE 
MOV 

ERROR 



•5002. .ERRNBR 
R1.0CSRA 
«BIT4.8LNCTRA 
61 

•eM4902.R2 



156260 



t 
t 

t - 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT •BIT06. OPTION 
BEQ 601 



BR 8* 



(EXIT yITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

tOURING THE SOFTWARE QUESTIONS. 

tSKiP FURTHER TESTING OF THIS LINE. 



1S6264 
156264 



6«; 



i ♦ 

t 

; - 



TRANSMIT THE XOFF (ASCII DCS) ON THE ASSOCIATED LIK. 



hOVB TXRL»0(R1}.SCSRA 
nOVB •2S.tf'DATA 



t SELECT THE ASSOCIATED TX LINE. 
iTRAMSniT THE XOFF CHMUCTER TO THE LlfT. 



; ♦ 
} 
I 



UAIT FOR TRANSniSSION TO CQNPLETC. 



INC ERRtfiR I INCREMENT ERROR NUr«ER TO 5003. 

MOV •170012.R1 I TEST BIT 15. TIMEOUT OF 10 HILLI SECS. 

MOV CSRA.R2 iPASS THE ADDRESS OF TIC REGISTER TO TEST. 

JSR PC.UAI8IS lUAIT FOR TRANSMISSION TO COMPLETE. 

BCC SOI i ABORT TEST IF TIMEOUT OCCURRED. 

MOV •5.R4 iPASS TIME-OUT OF 5 MILLI SECS. 

JSR PC. .DELAY iWAIT FOR CHAR TO BE RECEIVED AM) PROCESSED. 

TtEST the STATE OF THE TX.ENA8LE BIT ON THE LINE UNDER TEST. 
I REPORT ERROR IF Tx .ENABLE BIT IS SET. 



INC ERRNBR (INCREMENT ERROR NUMBER TO 5004. 

MOV 401. Rl iGET THE NUMBER OF THE LINE TEST. 

MOV Rl.SCSRA iSELECT THE LINE CURRENTLY UNDER TEST. 

TST STXA02A iTEST THE STATE OF THE TX.ENABLE BIT. 

BPL 8t I SKIP ERROR REPORT IF BIT IS CLEAR. 

MOV •EM4902.R2 iPASS THE MESSAGE TO BE REPORTED. 

I "OAUTO BIT BAD ON LINE NN". 
ERROR I >%>>> ERROR tSOO* «<<<<. 

TRAP CtERROR 
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SEO 150 



5673 








56 74 








5675 








S676 


0240S2 


032767 


000100 

WW A WW 


5677 


024040 


001513 




S67a 








5679 








5680 


024042 


005267 


000210 


5681 


024046 


005705 




5682 


024050 


001303 




5685 








5684 








5685 








5686 


024052 


016705 


000202 


5687 


024056 


004767 


172744 


5688 


024062 


016705 


000172 


5689 


024066 


005067 


000164 


5690 


024072 


012767 


011615 


5691 


024100 


016701 


000152 


5692 


024104 


000241 




5693 


024106 


006005 




5694 


024110 


103041 




5695 








5696 








5697 








5698 


024112 


116177 


004010 


5699 


024120 


112777 


000021 


5700 








5701 








5702 








5703 


0241^ 


012701 


170012 


5704 


024132 


016702 


156070 


5705 


024136 


004767 


173274 


5706 


024142 


103047 




5707 


024144 


012704 


000005 


5708 


024150 


U04767 


170106 


5709 








5710 








5711 








5712 








5713 


024154 


005267 


157672 


5714 


024160 


016701 


000072 


5715 


024164 


010177 


156036 


5716 


024170 


005777 


156046 


5717 


024174 


100407 




5718 


024176 


012702 


005760 


5*719 








5720 


024202 
024202 


104460 




5721 








5722 








5723 








5724 








5725 


024204 


032767 


000100 


5726 


024212 


001425 




5727 








5728 









156150 



EXIT THE TEST IF EXTEh40E0 ERROR REPORTING HAS NOT BEEN ENABLED 



8t: 



BIT «eiT06. OPTION 
BEQ 60$ 



INC 40* 
TST R5 
RNE 41 



jEXiT WITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

i INCREMENT THE LINE NUMBER. 

jCHECK IF THERE ARE ANT MORE LINES TO TEST, 

i 



157752 101: 



{^DISABLE TRANSMITTERS ON THE SELECTED LINES IN THE CURRENT LINE GROUP. 

* (RESTORE THE CURRENT LINE ACTIVE LINE GROUP. 

(DISABLE TRANSMITTERS ON THE SELECTED LINES. 
iGET THE CURRENT LINE ACTIVE LINE GROUP AGAIN. 
I CLEAR THE LINE COUNTER. 
iSET ERROR NUMBER TO 5005. 
I COPY THE LINE NUMBER. 

(CLEAR CARRY BIT PRIOR TO SHIFTING BIT MAP. 
(SHIFT ACTIVE LINE BIT MAP INTO CARRY BIT. 
(SKIP TESTING THIS LINE IF IT IS INACTIVE. 



MOV 

JSR 
MOV 
CLR 
MOV 
MOV 
CLC 
ROR 

BCC 



45t.R5 
PC.^XDSBL 
45t.R5 
40» 

«5005. .ERRNBR 
40I.R1 

R5 
121 



156106 
156106 



TRANSMIT THE XON (ASCII OCl) ON THE ASSOCIATED LINE. 



MOVB TXRtNB(Rl).8CSRA (SELECT THE ASSOCIATED TX LINE. 

MOVB ♦21.SrDATA (TRANSMIT THE XON CHARACTER TO THE LUT. 



{ ♦ 

t 

( - 



WAIT FOR TRANSMISSION TO COMPLETE. 



MOV •170012.R1 (TEST BIT IS, TIMEOUT OT 10 MILLI SCCS. 

MOV CSRA.R2 (PASS THE ADDRESS OF TK. REGISTER TO TEST. 

JSR PC.UAIBIS (WAIT FOR DMA TO COMPLETE. 

BCC sot (ABORT TEST IF TIMEOUT OCCURRED . 

MOV «5.R4 (PASS TIME-OUT OF 5 NILLI SECS. 

JSR PC. DELAY (UAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 

!*rEST T»C STATE OF THE TX .ENABLE BIT ON THE LINE UNDER TEST. 
( REPORT ERROR IF TX.ENABLE BIT IS CLEAR. 



i - 



155776 



( ♦ 
( 

t - 



INC ERRNBR (INCREMENT ERROR NUMBER TO 5006. 

MOV 40$. Rl (GET T»C NUMBER OF THE LINE UNDER TEST. 

MOV R1.8CSRA (SELECT THE LINE OXMENTLV UNDER TEST. 

TST 8TXA02A a TEST THE STATE OF THE TX.ENABLE BIT. 

BMI 12$ (SKIP ERROR REPORT IF BIT IS SET. 

MOV «EM4902.R2 (PASS THE MESSAGE TO BE REPORTED. 

t "OAUTO BIT BAD ON LINE NN". 
ERROR I >>>>> ERROR 45006 <<<<<. 

TRAP C«ERROR 

EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT •BIT06, OPTION 
BEQ 60$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN RFQLCSTEO 

(DURING THE SOFTWARE QUESTIONS. 
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5729 


024214 


005267 


000056 


5750 024230 


005705 




5-^31 


024222 


001525 




5752 








5753 








S754 








5"35 








5736 








5757 


024224 


005705 




5758 


024226 


001417 




5759 


024250 


005005 




5740 


024252 


012705 


177777 


5741 


024256 


004767 


172660 


5742 


024242 


016 ''05 


155752 


5745 


024246 


046705 


156006 


5744 


024252 


000167 


177372 


5745 








5746 


024256 


000000 




5747 


024^60 


000000 




5748 


024262 


004767 


172404 


57^>9 


024266 


005067 


155756 


5750 








5751 


024272 
024272 
024272 


104401 
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INC 40$ 
TST R5 
BNE 10$ 
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SEQ 151 



t INCREMENT THE LINE NUMBER. 

I CHECK IF THERE ARE ANY MORE LINES TO TEST. 



s 



CHECK LOOP CONTROL FLAG TO DETEf<MINE IF BOTH SETS OF LINES HAVE BEtN TESTED 
IF THIS IS THE FIST TIME AROUND. RE-ENABLE TX ON ALL LINES. GENERATE ACTIVE 
BIT MAP FOR SECOND LINE GROUP. 



401 
45$ 
50$ 
60$ 



TST 
BEQ 

CLR 

MOV 
JSR 

MOV 

BIC 
JMP 

.WORD 
.WORD 
JSR 
CLR 

ENDTST 



R5 I HAVE BOTH LINE GROUPS Bfc'EN TESTED?. 

60$ I YES I THEN EXIT THIS TES1 . 

R5 I NO I CLEAR THE LOOP CONTROL FLAG. 

^aplns;R5 I pass the bit map of all available line. 

PC.TXENBL iRE-ENABLE TRANSMISSION ON ALL LINES. 

ACTLNS.R5 iGET THE ACTIVE LINE BIT MAP. 

LGRP1M,R5 {REMOVE ALL ACTIVE LINES IN GROUP 1. 

2$ sONCE MORE AROUND AND UE ARE DONE. 

0 {STORAGE FOR CURRENT LINE NUMBER. 

0 iSTORAGE FOR CURRENT ACTIVE LINE BIT MAP. 

PC.TSABRT iREPORT TEST ABORTED. NON TEST RELATED ERROR. 

CTRLCF {INDICATE THAT UE ARE NOT WITHIN A TEST. 



L100S3: 



TRAP 



C$ETST 



CZOHVBO DHU 11 ruNC TST PAR 12 
TEST 
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5753 
5754 
5755 
5756 
5757 
5758 
5759 
5760 
5761 
5762 
5765 
5764 
5765 
5766 
5767 
5768 
5769 
5770 
5771 
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5772 



5775 
5774 
5775 
5776 
5777 
5778 
5779 
5780 
5781 
5782 
5785 
5784 
5785 
5786 
5787 
5788 
5789 
5790 
5791 
5792 
5793 
5794 
5795 
5796 
5797 
5796 
5799 
5600 
5601 
5802 
5803 
5804 
5805 
5606 



024274 
024274 
024274 
024274 
024300 

024302 
024310 
024316 
024324 
024352 
024340 



C24346 
0243S2 



012700 
104441 

000007 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103156 



024360 
024364 
024370 
024374 
024400 
024404 
024410 



016705 
012700 
004767 
012700 
004767 
012704 
004767 



.SBTTL HAROUARE TEST 



- lAUTOI - 



- lAUTO BIT INACTIVE TEST 

THIS TEST VERIFIES THAT THE OUT'S lAUTO FUNCTION BEHAVES CORRECTLY 
WHEN INACTIVE. IE. I AUTO BIT CLEAR. 

ALL ACTIVE LINES ARE TESTED INDIVIDUALLY BY FILLING THE FIFO 

THEN READING THE RECEIVED DATA CHECKING FOR THE PRESENCE OF 

XOFF(ASCII DC3) OR XON (ASCII DCl) CHARACTERS. 

IF ANY ARE FOUND THEN APPROPRIATE ERRORS ARE REPORTED. 

ANY BMP COOES THAT ARE FOUND UILL BE PLACED ON THE BMP CODE QUEUE. 

TO BE REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON ALL ACTIVE LINES. IN INTERNAL 
LOOPBACK MODE. 



000240 



000007 
177777 
000001 
011755 
006051 
013136 



167644 



155744 
155732 
157524 
157520 
157514 
157510 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRIOS 



• TNUM » I 
•TNUM.TSTNUM 
♦-I.CTRLCF 
•l.ERRTYP 
•SIOL.EMIMBR 
«EM5101.ERRMSG 
«ER9101.ERR8tK 



T7* • 

t ALLOW LTC INTERRUPTS. 

MOV «(>RI0S.RC 
TRAP CtOPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

tSET UP THE TEST NUMBER. (51) 

•INDICATE THAT UE ARE IN A TEST. 

tSET ERROR TYPE AS FATAL IN ERROR TABLE. 

tSET ERftOR NUMBER TO 5101. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 



t RESET THE OUT TO A KNOUN STATE, REMOVE THE STATUS COOES FROM THE FIFO, 
i CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
I THIS SUBROUTINE REPORTS ERROR >»>> 5101 <<<«. 



JSR 
BCC 



PC.CLMST 
60t 



iRESET THE OHU-11. REPORT ANY ERRORS FQUM). 
tEXIT TEST IF FATAL ERROR FOUM>. 



t INITIALIZE THE 256 BYTE DATA PATTERN. 

t ENSURE THE DATA PATTERN IS FREE FROM XON'S OR XOFF'S TO PREVENT ERRORS. 

; NOTE: THE FIRST TWO CHARACTERS Ati> THE LAST TWO CHARACTERS UILL BE THE SAME. 



024354 004767 170220 



JSR 



PC.INDTPX 



(INITIALISE DATA PATTERN. 



155634 
000204 
173156 
177670 
173176 
000012 
167646 



|*SET INTERNAL LOOPBMK, DISABLE lAUTO. ENABLE RECEIVER ON THE SELECTED LINE, 
i SET LPR TO 36. 4K BAUD. 6 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

*' I PASS THE ACTIVE LINE BIT MAP. 

I PASS INT'L LQP6CK. ENABLE RX. DISABLE I AUTO. 
{INITIALISE THE LINE CONTROL REGISTER. 
tPASS THE LPR CONTENTS, 
tSET THE LPR CONTENTS TO 36. 4K BAUD. 
tPASS DELAY TIME OF 10 MILLI SECONDS. 
{WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

»• 



MOV 


ACTLNS.RS 


MOV 


♦204. RO 


JSR 


PC.WTWLNC 


MOV 


n77670.R0 


JSR 


PC.WTULPR 


MOV 


•10. .R4 


JSR 


PC. DELAY 
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5807 
5808 
5809 
5810 
5811 
5812 
5813 
5814 
5815 
5816 
5817 
5818 
5819 
5820 
b821 
5822 
5823 
5824 
5825 
5626 
5827 
5628 
5629 
5830 
5831 
5632 



lAUTOI 



SEQ 153 



5833 
5634 
5635 
5636 
5637 
5838 
5639 
5640 
5641 
5642 
5843 
5644 
5645 
5646 
5647 
5646 
5649 
S6S0 
5651 
5652 
5653 
5654 
5655 
5856 
5657 
5856 
5659 
5860 
5661 
5862 



024414 
024416 
024422 
024430 
024434 
024436 
024440 
024442 



024444 
024450 
024454 
024462 
024464 
024470 
024470 



024472 
024500 



024504 
024510 
024514 
024520 
024524 



024526 
024532 
024536 
024542 
024546 
024550 
024554 



005001 
005067 
012767 
004767 
103121 
000241 
006005 
103107 



005267 
010177 
032777 
001410 
012702 

104460 



032767 
001503 



024502 000467 



005267 
012702 
012703 
004767 
103065 



005267 
012701 
016702 
004767 
103054 
012704 
004767 



t 
t 
« - 



SET UP LOOP rOR ALL ACTIVE LINES. 

TEST THE STATE OF THE lAUTO BIT PRIOR TO TRANSMITTING THE DATA PATTERN, 
IF THE BIT IS SET. THEN REPORT THE ERROR AND SKIP TRANSMITTING 
THE DATA PATTERN ON THE SELECTED LINE. 
TRANSMIT A 256 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
EMPTY THE FIFO. AND VERIFY NO XOFF OR XQN CHARS WERE FOUND. 



000264 
011756 
170734 



157422 2$ i 



CLR 
CLR 
hOV 

JSR 

BCC 
CLC 
ROR 

BCC 



Rl 
55$ 

*5102. .ERRNBR 

PC.PUFIFO 

501 



R5 
121 



I CLEAR THE LINE NUMBER COUNTER, 
i CLEAR STORAGE FOR LINE NUMBER. 
tSET THE ERROR NUMBER TO 5102. 
I PURGE THE FIFO. 

iGO REPORT ERROR IF FIFO DID NOT PURGE. 
(CLEAR CARRY PRIOR TO ROTATING BIT MAP. 
iROTATE THE BIT MAP INTO THE CARRY BIT. 
iBRANCH IF LINE IS INACTIVE. 



157402 
155552 
000002 

006106 



155554 



000100 155510 



157342 
002650 
000400 
167654 



4»i 



157320 
170536 
155464 
172670 

000012 
167502 



» TEST THE lAUTO BIT 
i REPORT ERROR IF IT 
: 00 NOT TRANSMIT 



ON THE SELECTED ACTIVE LINE. 
IS SET. 

THE DATA PATTERN ON THE SELECTED LINE. 



I - 



INC 
HOV 
BIT 
BEQ 
MOV 
ERROR 



ERRNBR 
R1.8CSRA 
•BITl.a.NCTRA 
4» 

«Eri5102.R2 



I SET ERROR NUMBER TO 5103. 
I SELECT LINE TO TEST. 

I TEST THE STATE OF THE lAUTO BIT ON THIS LINE. 
tSKIP ERROR ir lAUTO BIT CLEAR 
I PASS THE CORRECT ERROR MESSAGE. 
I >>>>> ERROR <<<<<. 

TRAP C (ERROR 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT tBITOe. OPTION 
BEQ 60» 



BR 12« 



lEXlT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

iDURING THE SOFTUARE QUESTIONS. 

tSKIP TRANSillTTING DATA PATTERN. 



I* 



TRANSMIT DATA PATTERN OF 256 CHARS. 



I - 



INC ERRNBR tSET ERROR NUMBER TO 5104. 

HOV •B0r8AS,R2 i*»ASS THE START OF THE DATA PATTERN TO TX. 

MOV *2S6..R5 iPASS THE LENGTH OF THE DATA PATTERN. 

JSR PC.OQOHA t TRANSMIT THE DATA PATTERN. 

BCC sot I ABORT THE TEST IF ERROR FOUND DURING DMA TX. 

[wait for DMA TO COMPLETE. THEN WAIT FOR THE LAST CHARACTER PLUS XOFF 
t TO ARRIVE IN THE FIFO. 

INC ERRNBR iSET ERROR NUMBER TO 5105. 

MOV •170536.RI iPASS TIHE-OUT VALUE OF 350 MILLI SECS, 

MOV CSRA.R2 (PASS THE ADDRESS OF THE CSR. 

JSR PC.WAIBIS iMAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

BCC 501 iIF NO TX.ACTION WAS RECEIVED. ABORT THE TEST. 

MOV nO..R4 iPASS DELAY OF 10 MILLI SECS. 

JSR PC, DELAY I WAIT FOR LAST CWW TO ARRIVE IN THE FIFO. 
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3EQ 154 



5863 








5S64 








5865 








5866 








5867 








5868 


024560 


005267 


157266 


5869 


024564 


012701 


000400 


5870 


024570 


017702 


155434 


5871 


024574 


100041 




5872 








5873 








5874 








5875 


024576 


012700 


170301 


5876 


024602 


040200 




5877 


024604 


001002 




5878 


024606 


004767 


171666 


5879 








5880 








5881 








5882 


024612 


120227 


000023 


5883 


024616 


001406 




5884 


024620 


120227 


000021 


5885 


024624 


001403 




5886 


024626 


005301 




5887 


024630 


001357 




5888 


024632 


000413 




5884 








5890 


024634 


005267 


157212 


5891 


024640 


016701 


000042 


5892 


024644 


012702 


006144 


5893 


024650 
024650 


104460 




5894 








5895 








5896 








5897 








5898 


024652 


032767 


000100 


5899 


024660 


001413 




5900 








5901 








5902 








5903 








5904 


024662 


005267 


000020 


5905 


024666 


016701 


000014 


5906 


024672 


005705 




5^07 


024674 


001252 




5908 


024676 


000404 




5909 








5910 


024700 


004767 


171766 


5911 


024704 


000401 




5912 


024706 


000000 




5913 


024710 


005067 


155334 


5914 








5915 


024714 
024714 
024714 


104401 





READ 256 CHARS FROM THE FIFO. 
ARE FOUND. 



REPORT ERROR IF ANY XOFF'S OR XON' S 



6$i 



INC ERRNBR 

MOV ♦256.. Rl 

MOV SRBUFA.R2 

BPL 50$ 

! CHECK FOR BMP CODE IN THE FIFO. 



J INCREMENT ERROR NUWER TO 5106, 
I INITIALISE THE READ COUNTER. 
iREAO CHAR FROM THE FIFO. 
iGO REPORT ERROR IF FIFO EMPTY. 



SAVE ANY FOUND ON THE QUEUE. 



81; 



10$: 



MOV 

BIC 
BNE 
JSR 
i » 

t CHECK 

CMPB 
BEQ 

CMPB 
BEQ 

DEC 
BNE 
BR 

INC 
MOV 
NOV 
ERROR 



♦170301.ro I SET UP BMP BIT MASK. 

R2.R0 I TRY TO CLEAR ALL THE BMP BITS. 

8$ I SKIP BMPSAV IF NOT A BMP CODE. 

PC.SAVBMP tSAVE THE BMP CODE ON THE QUEUE. 

FOR XOFF AND XON CHARACTERS. 



R2.^23 »IS IT AN XOFF CHARACTER?. 

10$ (YES I GO REPORT ERROR. 

R2.A21 tNOi IS IT AN XON CHARACTER?. 

10$ lYESt GO REPORT ERROR. 

Rl :DECREMENT THE READ COUNT. 

6$ iLOOP TO READ THE NEXT CHAR. 

12$ sGO CHECK FOR ANY UNTESTED ACTIVE LINES. 

ERRNBR tSET ERROR NUMBER TO 5107. 

55$. Rl jPASS THE LINE NUMBER TO BE REPORTED. 

♦EM5103.R2 iPASS THE ERROR MESSAGE TO BE REPORTED. 

I >>>>> ERROR <<<<<. 

TRAP C$ERROR 



155330 



I ♦ 
I 
( - 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT «eiT06.0PTI0N 
BEQ 60$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

tOURINC THE SOFTUARE QUESTIONS. 



i ♦ 



t CHECK IF ALL ACTIVE LINES HAVE BEEN TESTED. 



t - 
12$: 



50$: 

55$: 
60$: 



INC 55$ tINCREHENT LINE NUMBER. 

MOV 55$. Rl iGET NUMBER OF THE NEXT LINE TO TEST. 

TST RS tARE THERE M4Y MORE ACTIVE LINES TO TEST?. 

BNE 2$ iLOOP TO CHECK ICXT LINE. 

BR 60$ tEXIT TEST. 

JSR PC.TSA8RT iREPORT TEST ABORTED. NON-TEST RELATED ERROR, 

BR 60$ tEXIT THIS TEST. 

.WORD 0 t STORAGE FOR LINE NUMBER. 

CLR CTRLCF i INDICATE THAT UE ARE NOT WITHIN A TEST. 

ENOTST 



L 10034: 



TRAP 



C$ETST 
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5917 
5918 
5919 
5920 
5921 
5922 
5925 
5924 
5925 
5926 
5927 
5928 
5929 
5930 
5931 
5932 
5935 



- lAUTOA 



Ml? 
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3EQ 155 



5934 



5935 
5936 
5937 
5936 
5939 
5940 
5941 
5942 
5943 
5944 
5945 
5946 
5947 
5948 
5949 
5950 
5951 
5952 
5953 
5954 
5955 
5'»56 
5957 
5956 
5959 
5960 
5961 
5962 
5963 
5964 
5965 
5966 
5967 
5968 
5969 
5970 



024716 
024716 
024716 
024716 
024722 

024724 
024752 
024740 
024746 
024754 
024762 



024770 
024774 
024776 



012700 
104441 
000010 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103402 
000167 



025006 
025012 
025016 
025022 
025026 
025032 
025036 



016705 
012700 
004767 
012700 
004767 
012704 
004767 



.SBTTL HARDWARE TEST 



- lAUTOA - 



- lAUTO BIT ACTIVE TEST 

THIS TEST VERIFIES THAT THE OUT'S lAUTO FUNCTION BEHAVES CORRECTLY 
WHEN ACTIVE. IE lAUTO ASSERTED HIGH. 

ALL ACTIVE LINES ARE TESTED INDIVIDUALLY BT FILLING THE FIFO. AND 
CHECKING FOR THE PRESENCE OF AT LEAST ONE X0FF( ASCII 0C3) CHARACTER 
AND ONE XON (ASCII DCl) CHARACTER. 

ANY BMP COOES THAT ARE FOUND WILL BE PLACED ON THE BMP CODE QUEUE. 
TO BE REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON ALL ACTIVE LINES. IN INTERNAL 
, LOOPBACK MODE. 



000240 



000010 
177777 
OOCOOl 
012121 
006174 
013136 



167222 
000400 



155322 
155310 
157102 
157076 
157072 
157066 



BGNTST 
SETPRl 



TNUH 

MOV 

HOV 

MOV 

MOV 

MOV 

MOV 



•PR 105 



• TNUH * 1 
•TNUM.TSTNUM 
♦-1.CTRLCF 
♦l.ERRTYP 
•5201..ERRNBR 
4EMS201.ERRMSG 
•ER9101.ERRBLK 



T6* • 

I ALLOW LTC INTERRUPTS. 

MOV «PRI05.R0 
TRAP C»SPRI 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

> SET UP THE TEST NUMBER. (52) 

.'INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET ERROR NUMBER TO 5201. 

tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

•SELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROil THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 5201 <<<<<. 



JSR 
BCS 
JMP 



PC.CLNRST 

.♦6 

601 



iRESET THE OHU-11. REPORT ANY ERRORS FOUND. 
lEXlT TEST IF FATAL ERROR FOUND. 



025002 004767 167572 



155206 
000206 
172530 
177670 
172SS0 
000012 
167220 



INITIALIZE THE 256 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN IS FREE FROM XON'S OR XOFF'S TO PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 



JSR 



PC.INDTPX 



I INITIALISE DATA PATTERN. 



> ♦ 



SET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SELECTED LINE. 
SET LPR TO 38. 4K BAUD. 8 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

tPASS THE ACTIVE LINE BIT MAP. 
tPASS INTERNAL L0P6CK. ENABLE RX AND lAUfO. 
{INITIALISE THE LINE CONTROL REGISTER. 
iPASS THE LPR CONTENTS. 
I SET THE LPR CONTENTS TO 36. 4K BAUD. 
.PASS DELAY TIME OF 10 MILLI SECONDS . 
I WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

SET UP LOOP FOR ALL ACTIVE LINES. 



MOV 


ACTLNS.RS 


MOV 


«206.R0 


JSR 


PC.WTWLNC 


MOV 


♦177670. RO 


JSR 


PC.WTWLPR 


MOV 


«10. ,R4 


JSR 


PC. DEL AY 
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SEQ 156 



5971 
5972 
5975 
5974 
5975 
5976 
5977 
5978 
5979 
5980 
5981 
5982 
5983 
5984 
5985 
5986 
5987 
5988 
5989 
5990 
5991 
5992 
5993 
5994 
5995 
5996 

5997 
5998 
5999 
6000 
6001 
6002 
6003 
6004 
6005 
6006 
6007 
6008 
6009 
6010 
6011 
6012 
6013 
6014 
6015 
6016 
6017 
6018 
6019 
6020 
6021 
6022 
6023 
6024 
6025 
6026 



025042 
025044 
025050 
025056 
025062 
025064 
025066 
025070 



025072 
025076 
025102 
025110 
025112 

025116 
025116 



025120 
025126 



005001 
005067 
012767 
004767 
103143 
000241 
006005 
103131 



005267 
010177 
032777 
001010 
012702 



104460 



032767 
001525 



025130 000511 



025132 
025136 
025142 
025146 
025152 



025154 
025160 
025164 
025170 
025174 
025176 
025202 



005267 
012702 
012703 
004767 
103107 



005267 
012701 
016702 
004767 
103076 
012704 
004767 



t TEST THE STATE OF THE OAUTO BIT PRIOR TO TRANSMITTING THE DATA PATTERN. 
8 IF THE BIT IS CLEAR. THEN REPORT THE ERROR AND SKIP TRANSMITTING 
; THE DATA PATTERN ON THE SELECTED LINE. 

I TRANSMIT A 224 CHARACTER DATA PATTERN USING DMA, ON A SINGLE CHANNEL 
t EMPTY THE FIFO. AND COUNT THE XOFF AND AN XON CHARS FOUND. 



000330 
012122 
170306 



I 



156774 2»: 



CLR 
CLR 
MOV 

JSR 

BCC 
CLC 
ROR 

BCC 



Rl 
55* 

«5202. .ERRNBR 

PC.PUFIFO 

501 



R5 
161 



I CLEAR THE LINE NUMBER COUNTER. 
I CLEAR STORAGE FOR LINE NUMBER. 
iSET THE ERROR NUMBER TO 5202. 
I PURGE THE FIFO. 

I GO REPORT ERROR IF FIFO DID NOT PURGE. 
J CLEAR CARRY PRIOR TO ROTATING BIT MAP. 
J ROTATE THE BIT MAP INTO THE CARRY BIT. 
(BRANCH IF LIHE IS INACTIVE. 



; ♦ 

: 
; 



TEST THE lAUTO BIT 
REPORT ERROR IF IT 



ON THE SELECTED 
IS CLEAR. 



ACTIVE LINE. 



00 NOT TRANSMIT THE DATA PATTERN ON THE SELECTED LINE. 



156754 
155124 
000002 

006227 



155126 



INC 
MOV 
BIT 
BNE 
MOV 

ERROR 



ERRNBR 
R1.8CSRA 
«BIT1,8LNCTRA 
4» 

«EM5202.R2 



(SET ERROR NUMBER TO 5203. 
t SELECT LINE TO TEST. 

J TEST THE STATE OF THE lAUTO BIT ON THIS LINE. 

;SKIP ERROR IF lAUTO BIT SET. 

tPASS THE CORRECT ERROR MESSAGE. 

t "lAUTO BIT FOUND CLEAR ON LINE NN" 

5 >>>>> ERROR <<<<<. 

TRAP CiERROR 



000100 155062 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

BIT «BIT06. OPTION jEXIT WITH TEST FAILURE MESSAGE IF 
BEQ 601 >N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

.•DURING THE SOFTWARE QUESTIONS- 



BR 



161 



(SKIP TRANSMITTING DATA PATTERN. 



156714 
002650 
000337 
167226 



4>: 



r TRANSMIT DATA PATTERN TO FILL THE FIFO. 223 CHARS * 32 XOFF'S * XON. 

' INC ERRNBR iSET ERROR NUMBER TO 5204. 

MOV •BUF8AS.R2 ;PASS THE START OF THE DATA PATTERN TO TX. 

MOV *223..R3 jPASS THE LENGTH OF THE DATA PATTERN. 

JSR PC.OOOMA I TRANSMIT THE DATA PATTERN. 

BCC 50$ i ABORT THE TEST IF ERROR FOUND DURING DMA TX. 

! WAIT FOR DMA TO COMPLETE. THEN WAIT FOR THE LAST CHARACTER PLUS XOFF 
i TO ARRIVE IN THE FIFO. 



156672 
170454 
155036 
172242 

000012 
167054 



I - 



INC ERRNBR iSET ERROR NUMBER TO 5205. 

MOV •170454. Rl iPASS TIME-OUT VALUE OF 300 MILLI SECS. 

MOV CSRA.R2 iPASS THE ADDRESS OF THE CSR. 

JSR PC.WAIBIS lUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

BCC 50$ I IF NO TX.ACTION WAS RECEIVED. ABORT THE TEST. 

MOV •10..R4 iPASS DELAY OF 10 MILLI SECS. 

JSR PC. DELAY I WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 
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SCO 157 



6027 








M2» 








b029 








6030 








60S1 


025206 


005005 




6052 


025210 


005004 




60SS 


025212 


005267 


156654 


6054 


025216 


012701 


000400 


6055 


0n222 


017702 


155002 


6056 


025226 


100061 




6057 








6056 








6059 








6040 


025250 


012700 


170501 


604t 


025254 


040200 




6042 


025256 


001002 




6045 


025240 


004767 


171254 


6044 








6045 








6046 








6047 


025244 


120227 


000025 


604S 


025250 


001001 




6049 


025252 


005205 




6050 


025254 


120227 


000021 


6051 


025260 


001001 




6052 


025262 


005204 




6055 


025264 


005501 




6054 


025266 


001412 




6055 








6056 








6057 








6056 








6059 


025270 


020127 


000176 


6060 


025274 


001552 




6061 


025276 


010400 




6062 








6065 


025500 


012704 


000001 


6064 


025504 


004767 


166752 


6065 


025510 


010004 




6066 


025512 


000745 




6067 








6066 








6069 








6070 








6071 


025514 


005705 




6072 


025516 


001405 




6075 


025520 


020427 


000001 


6074 


025524 


001415 




6075 


025526 


005267 


156520 


6076 


025552 


016701 


000042 


6077 


025556 


012702 


006144 


6076 








6079 


025542 
025542 


104460 




6060 








6061 








6062 









t • 
t 

I - 



m.0O 256 CHARS rRQn THE riro. COUNT ANT XOTF OR XQN ChMS FOUND. 



6ti 



CLf* 
OJt 
INC 
nov 
NOV 



RS 

«4 

•256.. Rl 
0181FA.R2 
SO* 

I'CICCK rOR BMP CODE 

' NOV •170501.ro 
BIC R2.R0 

ai 

PC.SAVBMP 



Bit 



10* t 



12»: 



JSft 

rC»CCK FOR XOFF 
I - 



I CLEAR XOFF COUNTER. 

t CLEAR XON COUNTER. 

iINCRE»CNT ERROR NUHBER TO 5206. 

t INITIALISE THE READ COUNTER. 

iREAD CHM FROn THE FIFO. 

iCO REPORT ERROR IF FIFO EN»Tt. 

IN r>C FIFO. SAVE ANT FOUND ON THE QUEUE. 

iSET UP »9 BIT HASK. 
iTRT TO CLEAR ALL THE BW» BITS. 
iSKIP BHPSAV IF NOT A BMP COOE. 
iSAVE THE SHP COOE ON THE QUEUE. 



AND XON CHARACTERS. 



CHP8 



R2.^2S 
10 » 
R5 

R2,«21 
12« 
R4 
Rl 
ISt 



lis IT AN XOFF CHARACTER?. 
iNO. BRANCH TO SEE IF IT IS AN XON. 
t COUNT THE XOFF CHAR, 
lis IT AN XON CHARACTER?. 
iNO. SKIP THE NEXT INSTRUCTION. 
I COUNT THE XON. 
lOECREHENT THE READ COUNT. 
tBRRNCH IF ALL CHARACTERS READ. 



INC 
CNP8 
BNE 
INC 
DEC 
BEO 

' check if T»C FIFO HAS BEEN EWTIED BELOW THE HALF LEVEL. 
I HAS DELAY FOR IMS TO ALLOU THE XON TO BE GENERATED. 



IF IT 



I - 



15*! 



14t: 



cn» 


Rl.«126. 


BNE 


6t 


MOV 


R4.R0 


MOV 


♦I.R4 


JSR 


PC. DELAY 


MOV 


R0.R4 


BR 


6» 


r VERIFY 


THAN AT LEAST 


1 REPORT 


ERROR IF NONE 


1 ■ 

TST 


R5 


BEQ 


141 


CMP 


R4.^l 


BEQ 


161 


INC 




MOV 


551, Rl 


MOV 


•EM5105.R2 



ERROR 



lis THE FIFO LEVEL • 126 ? 

iLOOP TO READ THE NEXT CHARACTER IF NOT. 

I SAVE THE XON COUNT. ALTHOUGH THERE SHOULON 

iBE ANY. 

I SET T»C DELAY TO IMS. 
iPERFORM THE DELAY. 
(RESTORE T»C XON COUNT. 
tLOOP TO READ THE NEXT CHAR. 

1 XOFF AND 1 XON WAS FOUND IN THE FIFO. 



I CHECK XOFF COUNT. 

iCO REPORT ERROR IF NONE FOUND. 

iCHECK XON COUNT - 1. 

iSKIP THE ERROR REPORT IF ONE XON WAS FOUND. 

iSET ERROR NUMBER TO 5207. 

iPASS THE LINE NUMBER TO BE REPORTED. 

tPASS T»€ ERROR «SSAGE TO BE REPOPTEO. 

I "lAUTO BIT BAD ON LINE NN". 

I » » > > » ERROR <<<<*. 

TRAP CURROR 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT SEEN ENAeiEO 
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SEO 156 



6oas 








1 




60M 025S44 


052767 


000100 


154696 


BIT 


#Bi roe. OPTION 


6065 025552 


001415 






BEQ 


60t 


6066 












6087 






1 






6086 






1 


CHECK IF 


ALL ACTIVE LINES 


6069 






1 


- 




6090 025554 


005267 


000020 


16t$ 


INC 


551 


6091 025560 


016701 


000014 




HOV 


551. Rl 


6092 025564 


005705 






TST 


R5 


6095 025566 


001250 






8ME 


2* 


6094 025570 


000404 






BR 


601 


6095 












6096 025572 


004767 


171274 


501: 


JSR 


PC.TSABRT 


6097 025576 


000401 






BR 


60* 


6096 025400 


000000 




55»s 


• WORD 


0 


6099 025402 


005067 


154642 


601: 


CLR 


CTRLC<=^ 


6100 












6101 025406 








ENDTS1 




025406 












025406 


104401 











lEXIT WITH TEST FAILURE MESSAGE ir 

tHO EXTENDED ERROR REPORTING HAS SEEN REQUESTED 

lOURTNC THE SOTTlMRE QUESTIONS. 



iINCRErCNT LINE NUMBER. 

iGET NUMBER OF T»€ NEXT LINE TO TEST. 

I ARE ThCRE ANT MORE ACTIVE LINES TO TEST?. 

iLOOP TO CHECK NEXT LINE. 

lEXlT TEST. 

iREPORT TEST ABORTED. NON-TEST RELATED ERROR. 

lEXlT THIS TEST. 

(STORAGE FOR LINE NUMBER. 

t INDICATE THAT yE ARE NOT WITHIN A TEST. 



L100S5: 



TRAP 



CIETST 



lAT 
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SEQ 159 



610S 
6104 
6105 
6106 
6107 
6106 
6109 
6110 
6111 
6112 
6119 
6114 
6115 
6116 
6117 
6116 
6119 

6120 



6121 
6122 
6125 
6124 
6125 
6126 
6127 
6126 
6129 
61S0 
61S1 
61S2 
6135 
6154 
6135 
6156 
6157 
6156 
6159 
6140 
6141 
6142 
6145 
6144 
6145 
6146 
6147 
6148 
6149 
6150 
6151 
6152 
6155 
6154 
6155 
6156 



,S8TTL 



TEST 



FIFOAT 



025410 
025410 
025410 
025410 
025414 

025416 
025424 
025452 
025440 
025446 



025454 
025460 



025462 
025466 
025470 



025474 

025500 
025504 
025510 
025514 
025520 
025524 
025550 



- FIFO VALID DATA TEST - 

THIS TEST VERIFIES THAT THE OUT IS CAPABLE OF HOLDING 256 VAi.10 
CHARACTERS IN ITS FIFO. 

THE CHARACTERS ARE TRANSHITTEO ON THE FIRST AVAILABLE ACTIVE LINE. IN 
INTERNAL LOOPeACK NODE. 

THE DATA FOUND IN THE FIFO IS COHPARED UITH THE EXPECTED DATA, AND ANT 
DISCREPANCIES ARE REPORTED 

ANY BHP CODE FOUND UILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 
HOWEVER THE BHP CODE UILL BE PLACED ON THE BHP CODE QUEUE. TO BE 
REPORTED LATER. 



012700 
104441 

000011 
012767 
012767 
012767 
012767 
012767 



000240 



000011 
177777 
000001 
012265 
006265 



154650 
1S4616 
156410 
156404 
156400 



BGNTST 

SETPRI «PR105 



TNUH TNUM • 1 

MOV ♦TNUM. TS TNUM 

MOV ♦-1.CTRLCF 

MOV #l.ERRTYP 

MOV *5501..ERRNBR 

MOV «EM5301.ERRMSG 



T9: : 

lALLOU LTC INTERRUPTS. 

MOV •PRI05.ro 
TRAP CISPRI 

t INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. (55) 

(INDICATE THAT UE ARE IN A TEST. 

tSET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR NUMBER TO 5501. 

•SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



t RESET THE OUT TO A KNOUN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
I CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
I THIS SUBROUTINE REPORTS ERROR >>>>> 5501 <<<<<. 



004767 166556 
10511S 



004767 167002 
105110 

004767 167054 



JSR 
BCC 



PC.CLWST 
60f 



iRESET THE DHU-11. REPORT ANY ERRORS FOUND. 
tEXiT TEST IF FATAL ERROR FOUND. 



012700 
004767 
012700 
004767 
012704 
004767 
012702 
012705 



000204 
172046 

177670 
172066 
000012 
166556 
002650 
000400 



'/find an active line on UHICH TO PERFORM THE TEST. 
I INITIALISE 256 BYTE DATA PATTERN. 

** JSR PC.FINACT iFIND AN ACTIVE LINE. 

BCC 60t lEXIT IF NO ACTIVE LINES FOUND. 

JSR PC.INOATP INITIALISE THE DATA PATTERN. 

i Transmit a 265 character data pattern using oma. on a single channel 

I AT 56. 4K BAUD. 6 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 
I • 

isET INTERNAL LGQPBACK ON THE SELECTED LINE. 

t TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINE. 

tPASS PARAMETER FOR INTERNAL LOPBCK . ENABLE RX. 
tINITILAISE THE LINE CONTROL REGISTER. 
iPASS THE LPR CONTENTS. 
I SET THE LPR CONTENTS TO 56. 4K BAUD. 
iPASS DELAY TIME OF 10 MILLi SECONDS. 
tUAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
iPASS THE START OF THE DATA PATTERN TO XX. 
R5 iPASS THE LENGTH OF THE DATA PATTERN. 



MOV 


«204.R0 


JSR 


PC.UTULNC 


MOV 


♦I 77670.ro 


JSR 


PC.UTULPR 


MOV 


•10.. R4 


JSR 


PC. DEL AY 


MOV 


•BUFBAS.R2 


MOV 


•BUFMID-BUFBAC. 
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SEQ 160 



^1^7 
Ol? ' 




AAS-PA7 


1 SA31 P 

l.^w^lc 


OlDO 




AAA 7A7 


1 AAA3A 




A^SS4A 


1 A4AS7 




O iOV 








OiOi 








OlDC 




















AAS>A7 


1 SA3AA 






A1 Al A3 




A1 




A1 07A1 


1 7 AS 3 A 


04w f 


APSSAA 


01A702 


1S4442 


#k1 All 




0047A7 


1 71646 




02SS70 


10S04S 




A1 7 A 




A12704 


ooooos 

WW www V 


A1 71 


AOSS7A 


AA47A7 


1AA4A0 


A1 7^ 








A1 73 








Oi. . ^ 








f%\ 7% 

Ql r ^ 










02SAA2 


006303 




Al 77 


APSAA4 


00S004 




A1 7A 


A2SAAA 


016 70S 


1S44 16 


A1 7Q 




012767 


012270 


A1 A A 


APSAPA 


Al 1S02 




Aim 




1AAA3A 




A1 
















AIM 








A1 AS 








6186 








A1A7 




AASPA7 


1 SA22? 


A1 AA 


APSAYA 


AA47A7 


1 AA1 42 


A1 AQ 




1 A3AA9 






A>SA3A 


1 A44AA 




A1Q1 








A19P 








61<)S 








6194 


02SA42 


AASPA7 


1SA2A4 


6195 


02S64A 






6196 


025650 


001412 




6197 


025652 


0127A7 


A12A44 


619A 


025660 




AAA 321 


6199 












1044AA 




6201 








6202 








6203 








6204 








620S 


025666 


032767 


OOOlOO 

www A WW 


6206 


025674 


00140S 




6207 








6208 








6209 


025676 


105204 




6210 


025700 


001344 




6211 


025702 


000402 





INC ERRNBR 
JSR PC.OOMMA 
BCC 50* 



i WAIT rOR DMA TO COMPLETE. 
I THE FIFO. 
I - 



(SET ERROR rM«ER TO 5502. 

{TRANSMIT THE DATA PATTERN. 

I ABORT TEST IF ERROR FOUND DURING DMA TX. 

THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 



INC ERRNBR iSET ERROR NUMBER TO 5505. 

MOV R1.R5 tSAVE THE NUMBER OF THE SELECTED ACTIVE LINE. 

MOV #170556. Rl iPASS TIME-OUT VALUE OF 550 MILLI SECS. 

MOV CSRA.R2 iPASS THE ADDRESS OF THE CSR. 

JSR PC.UAIBIS lUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

BCC 50» iBRANCH IF FIFO EMPTt. ABORT THE TEST. 

MOV «5.R4 tPASS DELAY OF 5 MILLI SECS. 

JSR PC. DELAY lUAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 

READ THE FIFO CHECKING FOR DATA CORRUPTION. REPORT ANY ERRORS FOUND. 
ABORT THE TEST IF A BMP CODE WAS FOUND IN THE FIFO. 



t - 



156252 2»: 



ASL R5 

CLR R4 

MOV RBUFA.RS 

MOV •5504. .ERRNBR 

MOV (R5).R2 

BPL 50* 



iMULTIPLY BY 2. 

{INITIALISE THE EXPECTED DATA. 

iGET THE ADDRESS OF THE RECEIVER BUFFER REG. 

iSET UP ERROR NUMBER EACH TIME AROUND LOOP. 

I GET THE ACTUAL DATA FROM THE FIFO. 

{ABORT THE TEST IF THE FIFO IS EMPTY. 



{ CHECK IF THE READ CHARACTER IS A BMP CODE. 

{ IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER. AND 
{ ABORT THE TEST. 



156176 



41: 



6*! 



INC ERRNBR 

JSR PC.CHKBMP 

BCC 41 
ERROR 



BR 601 

INL ERRNBR 

CMPB R4.R2 

BEQ 8* 

MOV •ER9002.ERRBLK 

MOV fEM5502.Rl 

(REPORT THE ERROR "FIFO 
ERROR 



{SET ERROR NUMBER TO 5505. 

(CHECK IF CHARACTER IS A BMP CODE. 

(BRANCH IF NOT A BMP CODE. 

( >>>>> ERROR 5505 <<<<<. 

TRAP CtERROR 

(ABORT THIS TEST. 

(SET ERROR NUMBER TO 5506. 

(COMPARE THE EXPECTED WITH THE ACTUAL DATA. 

(SKIP ERROR REPORT IF DATA IS OK. 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

(PASS THE MESSAGE TO BE REPORTED. 

BAD. DATA FIELD CORRUPTED" 

I > > > > > ERROR 5506 <<<<<. 

TRAP Ct^RROR 



154514 



( 

I 

{ - 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



8f : 



BIT •6IT06, OPTION 
BEQ 60 > 



INCB R4 
BNE 2% 
BR 60* 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 

(INCREMENT THE EXPECTED DATA. 

(LOOP IF NOT DONE. 

(FXIT 



r J o 
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6212 

6215 025704 004767 170762 50$: JSR PC.TSABRT i ABORT THE TEST. REASON SHOUN BY ERROR NUMBER. 
6214 025710 005067 154334 60t: CLR CTRLCF .INDICATE THAT U*" ARE NOT WITHIN A TEST. 
6215 

6216 025714 ENDTST 

025714 L 10036: 

025714 104401 TRAP CIETST 



CZOHVBO OHU-ll FUNC TST PART2 HACRO M1200 
HARDWARE TEST FZ3QLI 



15-NAR-84 09:28 PAGE 114 



SEQ 162 



6218 
6219 
6220 
6221 
6222 
6223 
6224 
6225 
6226 
6227 
6228 
6229 
6230 
6231 
6232 
6233 
6234 

6235 



6236 
6237 
6238 
6239 
6240 
6241 
6242 
6243 
6244 
6245 
6246 
6247 
6248 
6249 
6250 
6251 
6252 
6253 
62S4 
6255 
6256 
6257 
6258 
6259 
6260 
6261 
6262 
6263 
6264 
6265 
6266 
6267 
6268 
6269 
6270 
6271 



025716 
025716 
025716 
025716 
025722 

025724 
025732 
025740 
025746 
025754 
025762 



025770 
025774 



025776 
026002 



012700 
104441 

000012 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103111 



004767 
103106 



000240 



000012 
177777 
OOOOCl 
012431 
006452 
011762 



166222 



166466 



154322 
154310 
156102 
156076 
156072 
156066 



026004 004767 166570 



.SBTTL HARDWARE TEST 



FI3CH.I 



I* 
.♦ 

* 

* 

* 

* 

* 

* 

* 

* 

I-'* 



• FIFO 3/4 LEVEL INACTIi/E TEST 

THIS TEST VERIFIES THAT THE DUT'S FIFO 3/4 LEVEL ALARM SrSTEM 

REMAINS INACTIVE WHILE IT CONTAINS 191 CHARACTERS OR LESS, 

THE TEST LOOKS FQR AN XOFF (ASCII DC3) CHARACTER IN THE FIFO. 

IF ANY XOFF'S ARE FOUND AN ERROR WILL BE REPORTED AND THE TEST ABORTED. 

ANY BHP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO Bfc ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 
INTERNAL LOOPBACK MODE. 



BGNfST 
SETPRl 



TNUn 

MOV 

MOV 

NOV 

MOV 

MOV 

MOV 



•PRIOS 



• TNUH * 1 
•TNUn.TSTNUn 
♦-1.CTRLCF 
♦l.EfWTYP 
A>«01..ERRNBR 
•EM540l.EMmSG 
•EROSOS.ERRBLK 



TIO:: 

t ALLOW LTC INTERRUPTS. 

MOV •PRI05.ro 
TRAP C*SPRI 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

tSET UP THE TEST NUMBER. CS4) 

I INDICATE THAT WE ARE IN A TEST. 

tSET FATAL ERfNlR TYPE IN ERROR tablE. 

iSET ERROR NUMBER TO 5401. 

tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

tSELECT THE CORRECT ERROR REPORTING ROUTINE. 



: RESET T»€ OUT TO A KNDUN STATE. REMOVE THE STATUS COOES FROM T»C FIFO. 

I Clear tx and rx interrupt enable bits in the csr. 

t THIS SUBROUTINE REPORTS ERROR >>>>> S40i <<<<<. 



t - 



JSR PC.CLMST tRESET THE OMU-11. REPORT ANY ERRORS FOUND. 

BCC 601 lEXIT TEST IF FATAL ERRuR F9JM>. 



FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 



JSR 
BCC 



PC.FINACT 
60* 



iFIND THE NUMBER OF THE FIRST ACTIVE LDC. 
lEXIT IF NO LINES ARE AVAILABLE. 



INITIA..IZE THE 2S6 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN IS FREE FROM XON'S OR XOFF>S TO PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS A»0 THE LAST TWO CHARACTERS WILL BE THE SAtC. 



JSR 



PC.INDTPX 



I INITIALISE THE DATA PATTERN. 



TRANSMIT A 191 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
AT 38. 4K BAUD. 6 BITS PER CHARACTER. OOC PARITY. 2 STOP BITS. 



026010 
026014 



012700 
004767 



000206 
171532 



IsET INTERNAL LOOPBACK. ENABLE lAUTO AND RX ON THE SELECTED LINE. 
, TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINE. 

* MOV •206.ro jPASS INTERNAL LOPBCK. ENABLE Rx AND lAvTO. 

JSR PC.WTWLNC iINITlLAISE THE LINE CONTRa REGISTER. 
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rUNC TST PART2 MACRO Ml 200 

rise - 



6272 
6275 
6274 
6275 
6276 
6277 
6276 
6279 
6260 
6261 
6262 
6263 
6264 
6265 
6266 
6267 
6266 
6269 
6290 
6291 
6292 
6293 
6294 
6295 
6296 
6297 
6296 
6299 
6300 
6301 
6302 
6303 
6304 
6305 
6306 
6307 
6306 
6309 
6310 
6311 
6312 
6313 
6314 
6315 
6316 
6317 
6316 
6319 
6320 
6321 
6322 
6323 
6324 
6325 
6326 
6327 
6326 



SOLI 



026020 
026024 
026030 
026034 
026040 
026044 
026050 
026054 



026056 
026062 
026066 
026072 
026076 
026100 
026104 



026110 
026112 
026116 
026124 
026126 
026130 



026132 
026136 
026142 



012700 
004767 
012704 
004767 
012702 
012703 
004767 
103057 



005267 
012701 
016702 
004767 
103046 
012704 
004767 



005004 
016705 
012767 
011502 
100032 
005204 



005267 
004767 
103001 



026144 000421 



026146 
026152 
026156 
026160 



005267 
122702 
001003 
012701 



026164 000411 



177670 
171552 
000012 
166222 
002650 
000277 
166S24 
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MOV •177670. RO iPASS THE LPR CONTENTS. 

JSR PC.UTULPR I SET THE LPR CONTENTS TC 58. 4K BAUD. 

MOV #10.. R4 jPASS OELAr TIME OF 10 MILLI SECONDS. 

JSR PC. DELAY tUAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

MOV ♦eUFBAS.R2 iPASS THE START OF THE DATA PATTERN TO TX. 

MOV «191..R5 tPASS THE LENGTH OF THE DATA PATTERN. 

JSR PC.DODMA I TRANSMIT THE DATA PATTERN. 

BCC 501 ilF ERROR FOUND DURING DMA THEN ABORT TEST. 



SEQ 163 



! WAIT FOR DMA 
; THE FIFO. 



TO COMPLETE. THEN WAIT FQR THE LAST CHARACTER fO ARRIVE IN 



155770 
170454 
154134 
171340 

000005 
166152 



INC ERRNBR iSET ERROR NUMBER TO 5402. 

MOV #170454. Rl iPASS TIME-OUT VALUE OF 500 MILLI SECS. 

MOV CSRA.R2 tPASS THE ADDRESS OF THE CSR. 

JSR PC.UAIBIS lUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

BCC 501 iIF FIFO EMPTr. REPORT ERROR. ABORT THE lEST. 

MOV *S.R4 I PASS DELAY OF 5 MILLI SECS. 

JSR PC. DELAY iUAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



READ THE CONTENTS OF THE FIFO. IF ANY 
REPORT THE ERROR AND ABORT THE TESTi 

FIFO EMPTY TOO SOON. 

BMP CODE FOUND. 

XOFF CODE FOUND. 

EXTRA (192) CHARACTER FOUND IN FIFO. 



OF THE FOLLOUING C0»OITI0NS OCCUR 



154112 

012433 155726 



CLR R4 

NOV R8UFA.RS 

2t; NOV #3403.. ERRNBR 

NOV (RS).R2 

BPL 50t 

XNC IM 



I CLEAR THE CHARACTER COUNT. 

iGET THE ADDRESS OF THE RECEIVER BUFFER REG. 

tSET ERROR NUI«ER TO 5403. 

iGET TIC ACTUAL DATA FROM THE FIFO. 

iFXFO EMPTY. ABORT TEST. 

t COUNT THE CHARACTER. 



155714 
165634 



I CHECK IF T»C READ CHARACTER IS A BMP CODE. 

t IF XT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER. AND 
I ABORT THE TEST. 

'* INC ERRNBR tSET ERROR MJWER TO 5404. 

JSR PC.CHK8NP tCHECK IF CHARACTER IS A BMP CODE. 

BCC 4t {BRANCH IF NOT A BMP CODE. 

(REPORT ERROR -BMP CODE FOUND IN FIFO. TEST INVALIDATED' . 
BR 61 tREPORT TIC ERROR MO ABORT THE TEST. 

I*CHECK IF THE CHARACTER IS AN XOFF. REPORT THE ERROR IF ONE IS FOUND. 

t - 



026166 
026172 



005267 
020427 



155700 
000023 

006520 



155660 
000277 



4»: 



INC ERRNBR 
CMPB #23. R2 

BNE 6» 
NOV •EN5402.R1 

(REPORT THE ERROR 

BR 61 



6i: 



INC 
CMP 



ERRNBR 
R4.#191. 



I SET ERROR NUMBER TO 5405. 
t CHECK IF THE READ DATA IS AN XOFF. 
(BRANCH IF NOT AN XOFF. 
(PASS THE MESSAGE TO BE REPORTED. 
FIFO BAD. ALARM SIGNAL DEFECTIVE". 

(GO REPORT THE ERROR AND ABORT THE TEST. 

(SET ERROR NUMBER TO 5406. 

(CHECK IF UE HAVE READ ALL THE CHARACTERS. 



CZDHV80 OHO 11 ruNC 
HARDWARE TEST 



6329 
6330 
6331 
6332 
6333 
6334 
6335 

6336 
6337 
6338 
6339 
6340 
6341 
6342 



026176 
026200 
026202 
026204 



026210 
026210 
026212 



026214 
026220 

026224 
026224 
026224 
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SEQ 164 



001347 
011502 
100006 

012701 006520 



104460 
000402 



004767 170452 
005067 154024 



BNE 21 iLOOP BACK TO GET THE NEXT CHARACTER. 

MOV CR5).R2 iTRY TO READ AN EXTRA CHARACTER FROM THE FIFO. 

BPL 60> I EXIT IF NON FOUND. 

MOV •EM5402.R1 iPASS THE MESSAGE TO BE REPORTED. 

{REPORT THE ERROR "FIFO BAD. ALARM SIGNAL DEFECTIVE". 



81: 



501: 
60<: 



ERROR 
BR 



JSR 
CLR 

ENOTST 



60 1 



PC.TSABRT 
CTRLCF 



I >>>>> ERRORS 5304 THRU 5306 <<<<<. 

TRAP C TERROR 

jEXIT THE TEST. 

I >>>>> ERRORS 5402 AND 5403 <<<<<. 

(REPORT TEST ABORTED. NON -TEST RELATED ERROR. 
(INDICATE THAT UE ARE NOT WITHIN A TEST. 



L10037: 



104401 



TRAP 



CIETST 
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SEQ 165 



6344 
6345 
6346 
6347 
6348 
6349 
6350 
6351 
6352 
6353 
6354 
6355 
6356 
6357 
f358 
6359 
6360 
6361 

6362 



6363 
6364 
6365 
6366 
6367 
6368 
6369 
6370 
6371 
6372 
6373 
6374 
6375 
6376 
6377 
6378 
6379 
6380 
6361 
6382 
6363 
6364 
6365 
6386 
6367 
6388 
6389 
6390 
6391 
6392 
6393 
6394 
6395 
6396 
6597 



026226 
026226 
026226 
026226 
026232 

026234 
026242 
026250 
026256 
026264 



026272 
026276 
026300 



026304 
026310 
026312 



012700 
104441 

000013 
012767 
012767 
012767 
012767 
012767 



004767 
103402 
000167 



004767 
103402 
000167 



000240 



000013 
177777 
000001 
012575 
006561 



165720 
000414 

166160 
000402 



154012 
154000 
155572 
155566 
155562 



026316 004767 166256 



.SBTTL HARDWARE TEST 



FI3QLA - 



- FIFO S/4 LEVEL ACTIVE TEST - 

THIS TEST VERIFIES THAT THE OUT'S FIFO 3/4 LEVEL ALARM STSTEf: 

BECOMES ACTIVE UHEN THE FIFO CONTAINS > 19? CHARACTERS. 

THE TEST COMPARES THE ACTUAL NUMBER OF XOFF (ASCII 0C3) 

CHARACTERS THAT ARE FOUND IN THE FIFO UITH THE EXPECTED NUMBER. 

AN ERROR WILL BE REPORTED, IF THE COUNTS ARE FOUND TO DIFFER. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODC QUEUE. TO BE 

REPORTED LATER 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 
INTERNAL LOOPBACK MODE. 



BGNTST 

SETPRI «PRIOS 



TNUM -- TNUM ♦ 1 
MOV *TNUM.TSTNUM 
MOV ♦-l.CTRLCF 
MOV •l.ERRTYP 
MOV «5501..ERRNBR 
MOV «EM5501.EMmSG 



Til* • 

lALLOW LTC INTERRUPTS. 

MOV «PRI05.R0 
TRAP CISPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUTfiER. (55) 

I INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR NUTfiER TO 5501. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



t RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO, 
t CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
t THIS SUBROUTINE REPORTS ERROR >>>>> 5501 «<<<. 



JSR 
6CS 
JMP 



PC.CLNRST 
60» 



iRESET THE OHU-11. REPORT ANY BtRORS FOUND. 
I SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
lEXIT TEST FATAL ERROR FOUND. 



t FIND AN ACTIVE LINE ON WHICH TO PERF0f»1 THE TEST. 

JSR PC.FINACT iFIND AN ACTIVE LINE. 

6CS .»6 iSKIP EXIT OF TEST IF ACTIVE LINE FOUND. 

jnP 60» lEXIT TEST. 

TlNITIALlZE THE 256 BYTE DATA PATTERN. 

i ENSURE THE DATA PATTERN IS FREE FROM XQN'S OR XOFF'S TO PREVENT ERRORS. 

: NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SATC. 



JSR 



PC.INOTPX 



{INITIALISE DATA PATTERN. 



r TRANSMIT A 191 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
t AT 56. 4K BAUD. 6 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

! SET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SELECTED LINE, 
t TRANSMIT THE FIRST 191 CHARACTERS ON THE FIRST AVAILABLE ACTIVE I INE. 



026522 005267 155524 



2S: 



INC 



ERRNBR 



I SET ERROR NUMBER TO 5502. 



^16 
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SEQ 166 



6398 
6399 
6400 
6401 
6402 
6403 
6404 
6405 
6406 
6407 
6408 
6409 
6410 
6411 
6412 
6413 
6414 
6415 
6416 
6417 
6418 
6419 
6420 
6421 
6422 
6423 
6424 
6425 
6426 
6427 
6428 
6429 
6430 
6431 
6432 
6433 
6434 
6435 
6436 
6437 
6438 
6439 
6440 
6441 
6442 
6443 
6444 
6445 
6446 
6447 
6448 
6449 
6450 
6451 
6452 
6453 
6454 



026326 
026332 
026336 
026342 
026346 
026352 
026356 
026360 
026364 
026370 
026374 



026376 
026402 
026406 
026412 
026416 
026420 
026424 



026430 
026434 
026436 
026442 
026446 
026452 



026454 
026460 
026464 
026470 
026474 
026476 
026502 



026506 
026512 
026514 
026520 



026522 
026526 
026530 



Ol P700 




MOV 


<^206 . RO 


(PASS INTERNAL LOPBCK, ENABLE RX AND I AUTO. 




1 71 P14 


JSR 


PC . UTULNC 


1 INITIALISE THE LINE CONTROL REGISTER 




177670 


MOV 


1^177670, RO 


J PASS THE LPR CONTENTS. 






JSR 


PC. UTULPR 


iSET THE LPR CONTENTS TO 38 4K BAUD 




OOOOI2 


MOV 


^10. •R4 


iPASS OELA^ TIME OF 10 MILLI SECONDS. 




165704 


JSR 


PC. DELAY 


lUAIT FOR LNCTRL AND LPR REGS TO BE UPDATED 


010105 




MOV 


RI.R5 


iCOPY THE LINE NUMBER. 


012702 


002650 


MOV 


«eUFBAS.R2 


iPASS THE START OF THE DATA PATTERN TO TX. 


012703 


000277 


MOV 


♦191.. R3 


iPASS THE LENGTH OF THE DATA PATTERN. 


004767 


166004 


JSR 


PC.DOOMA 


1 TRANSMIT THE DATA PATTERN. 


103147 


BCC 


S0» 


1 ABORT THE TEST IF ERROR FOUND DURING DMA TX 



005267 
012701 
016702 
004767 
103136 
012704 
004767 



005267 
010501 
012702 
012703 
004767 
103120 



005267 
012701 
016702 
004767 
103107 
012704 
004767 



012702 
105022 
020227 
103774 



005267 
010501 
012702 



155450 
170454 
153614 
171020 

000005 
165632 



155416 

002650 
000001 
165726 



155372 
170012 
153536 
170742 

000005 
165554 



002650 
003250 



: ♦ 



WAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
I THE FIFO. 



I - 



INC ERRNBR iSET ERROR NUMBER TO 5503. 

MOV ♦170454. Rl iPASS TIME-OUT VALUE OF 300 MILLI SECS. 

MOV CSRA.R2 iPASS THE ADDRESS OF THE CSR. 

JSR PC.UAIBIS lUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

sec 501 tIF NO TX.ACTION IMS RECEIVED. ABORT THE TEST. 

MOV •S.R4 tPASS DELAY OF 5 MILLI SECS. 

JSR PC. DELAY lUAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



i ♦ 

I 



TRANSMIT A NULL CHARACTER UHICH UILL CAUSE AN XOFF TO BE GENERATED. 



INC 


ERRNBR 


iSET ERROR NUWER TO 5504. 


MOV 


RS.Rl 


iPASS THE LDC NUWER. 


MOV 


•BUFBAS.R2 


(PASS THE START OF THE DATA PATTERN TO TX. 


MOV 


•1.R3 


tPASS THE NUIfiER OF CHARACTERS TO TX. 


JSR 


PC.OODMA 


tTX A NULL CHARACTER TO CAUSE AN XQFF. 

1 ABORT THE TEST IF ERROR FOUND DURING DMA TX. 


BCC 


501 



UAIT FOR THE DMA TO COMPLETE AND THE LAST CHAR TO ARRIVE IN THE FIFO 



INC 
MOV 
MOV 
JSR 
BCC 
MOV 
JSR 



•1 70012. Rl 

CSRA.R2 

PC.UAIBIS 

sot 

•5.R4 

PC. DELAY 



I INITIALISE THE 256 BYTE 

MOV «eUFBAS.R2 

4t: CLRB (R2)« 

CMP R2.«BUFHI0 

BLO 41 



iSET BWOR NUMBER TO 5505. 

I PASS TIME-OUT VALUE OF 10 MILLI SECS. 

•PASS THE ADDRESS OF THE CSR. 

tUAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

I IF NO TX.ACTION UAS RECEIVED. ABORT THE TEST. 

I PASS DELAY OF 5 MILLI SECS. 

llMIT FOR XOFF TO GET INTO THE FIFO. 

DATA PATTERN TO ALL NULLS. 

{INITIALIZE THE DATA PATTERN TO BE 

I ALL NULLS. 

I 

t 



155324 
002650 



( TRANSMIT A FURTHER 31 NULL CHARACTERS UHICH UILL CAUSE 31 XOFFS TO BE 
t GENERATED. 

* INC ERRNBR (SET ERROR NUMBER TO 5506. 

MOV RS.Rl I PASS THE LINE NUMBER. 

MOV •auFBAS.R2 tPASS THE START OF THE DATA PATTERN TO TX. 



Li3 



CZOHVBO OHU 11 TUNC TST PAR 72 
HARDWARE TEST 



FI3QLA 



MACRO MiaoO 15-MAR 64 09:28 PAGE 115-2 



SEQ 167 



6455 


026534 


012703 


000037 


6456 


026540 


004767 


165634 


6457 


026544 


103063 




6458 








6459 








6460 








6461 








6462 


026546 


005267 


155300 


6463 


026552 


012701 


170454 


6464 


026556 


/\ 4 ^ ^AO 

016702 


153444 


6465 


026562 


AAA 

004 ^6r 


1 f 0650 


6h66 


v26^6 


1030D2 




6467 


026570 


012704 


AAAAAQ 
000005 


6468 


026574 


004767 


165462 


6469 
















6471 








64 f 2 








64 


026600 


AACAAA 




64 f 4 


026602 






64 fO 


026604 


Al OTA* 

Olc: f Ol 


1 /OUOl 


64 ^6 


026610 


A* OT^T 

012 ^6 r 


0126O4 


64 f f 


026616 


At iLlfS^ 

016 f 02 


1534 U6 


64 /O 


026622 


AAA 

004 /6' 


t *7 A^ 1 A 

170610 


64 


A*^^£ O^ 

026626 


105032 




64oO 


026630 


005204 




64ol 








04o<: 








64oo 








AA 

64 o4 








ILA Ad 

64oD 


026632 


005267 


« CC04 A 

155214 


64 o6 


026636 


/\AJi T 

004767 


165134 




U^6642 


100422 




64 OO 








ILA AO 








64W 








64^11 


026644 


122702 


000023 


64 


026650 


001001 






AO£^i*0 


AACOAT 

VOD203 




64 








64 ^fD 








64^*0 








64 >y f 


026654 


A 1 Ail 0*7 

02042 / 


AAAA A A 

000400 


^LAOA 
04':^0 


026660 


002753 




64 'y** 










































U£600c 


At OTiL.T 
012 #6 r 


Al O^AiL 

012606 








UUUU40 


6506 


026674 


001411 




6S07 






oil lf%P 


6508 


026704 


012701 


006520 


6509 








6510 


026710 
026710 


104460 





MOV 
JSR 
BCC 



♦31. .R3 

PC.OOOMA 

50$ 



jPASS THE LENGTH OF THE DATA PATTERN. 
I TRANSMIT THE DATA PATTERN 

I ABORT THE TEST IF ERROR FOUND DURING DMA TX. 

TO BE RECEIVED. 



!*WAIT FOR THE XOFF'S AND THE NULL CHARACTERS 
I THERE ARE NOU 255 CHARACTERS IN THE FIFO. 

' INC ERRNBR iSET ERROR NUMBER TO 5507. 

MOV ♦170454. Rl jPASS TIME-OUT VALUE OF 300 MILLI SECS. 

MOV CSRA.R2 jPASS THE ADDRESS OF THE CSR. 

JSR PC.UAIBIS ;WAIT FOR DMA TO COMPLETE, TX.ACTION SET. 

aCC 50» J IF NO TX.ACTION UAS RECEIVED, ABORT THE TEST, 

MOV *5,R4 I PASS DELAY OF 5 MILLI SECS. 

JSR PC. DELAY J WAIT FOR XOFF TO GET INTO THE FIFO. 

I READ THE FIFO UNTIL EMPTY. COUNTING THE NUMBER OF XOFF CHARACTERS 
i THAT ARE FOUND. 



155234 61: 



CLR R4 

CLR R3 

MOV #170001. Rl 

MOV •5508. .ERRNBR 

HOV RBUFA.R2 

JSR PC.UAIBIS 

BCC 501 

INC R4 



t CLEAR CHARACTER COUNTER. 

I CLEAR THE XOFF FOUND COUNTER. 

.INDICATE TO TEST DATA. VALID BIT. TIME-OUT IMS. 
(SET UP ERROR NUMBER EACH TIME AROUND THE LOOP. 
(INDICATE TO CHECK RECEIVE BUFFER REGISTER. 
lUAIT FOR RECEIVED CHAR OR TIME-OUT. 
(60 REPORT ERROR IF FIFO EMPTY. 
(COUNT THE CHARACTER. 



CHECK FOR BMP CODES IN THE FIFO. ABORT THE TEST IF ANY ARE FOUND. 
SAVE THE BMP CODE ON THE QUEUE TO BE REPORTED LATER. 



INC 
JSR 
BCS 



ERRNBR 

PC.CHKBMP 

12» 



(SET ERROR NUMBER TO 5509. 

(CHECK IF UE HAVE GOT A BMP CODE. 

tCO REPORT THE ERROR IF UE FOUND A BMP CODE. 



CHECK FOR XOFF CHARACTER. 



8»: CMPB •23.R2 

BNE I0> 
INC RS 

TCHECK IF ALL THE CHARACTERS INCLUDING THE XON HAVE BEEN (AMOVED 



(CHECK IF THE RECEIVED CHARACTER WAS AN XOFF, 
(BRANCH IF CHARACTER UAS NOT AN XOFF. 
I INCREMENT XOFF FOUND COUNT. 



lot: 



CMP 
BLT 



R4.«256. 
6t 



(CHECK IF UE HAVE REMOVED ALL THE CHARACTERS. 
iGO GET THE NEXT CHAR IF UE HAVE NOT FINISHED. 



( ♦ 



CHECK IF THE CORRECT NUMBER OF XOFF'S UERE FOUND IN THE FIFO. 
REPORT ERROR IF COUNT IS INCORRECT. 



155162 
155152 



12$: 



MOV 
CMP 
BEQ 
MOV 
MOV 

(REPORT 
ERROR 



•5510.. ERRNBR 
•32.. RS 
60t 

•ER0503.ERR6LK 
•EM5402.R1 



(SET UP THE ERROR NUMBER TO 5510. 
(COMPARE EXPECTED XOFF COUNT UITM ACTUAL COUNT. 
(EXIT TEST IF SUCCESS. 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 
(PASS THE MESSAGE TO BE REPORTED. 
THE ERROR "FIFO BAD. ALARM SIGNAL DEFECTIVE". 

I »>>>» ERROR <<<<<. 

TRAP CtERROR 



MiRouSSE^T^sP ^'*F1§QLa"*^'*° ^^^^ ®* 09:28 



6511 026712 
6512 

6513 026714 

6514 026720 
6515 

6516 026724 
026724 
026724 



000402 

004767 
005067 



104401 



167752 
153324 



M13 
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SEQ 168 



50»: 
601: 



BR 

JSR 
CLR 

ENDTST 



60> 



t ABORT THE TEST. 

PC.TSA8RT iREPORT TEST ABORTED. ERROR # SHOVIS REASON. 

CTRLCF I INDICATE THAT UE ARE NOT WITHIN A TE3T. 



L1004C: 



TRAP 



C*ETST 



N15 



CZOHVBO OHU 11 FUNC TST PART 
HARDWARE TEST 
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SEQ 169 



6516 
6519 
6520 
6521 
6522 
6523 
6524 
6525 
6526 
6527 
6528 
6529 
6530 
6531 
6532 

6533 



6534 

6535 
6536 
6537 
6538 
6539 
6540 
6541 
6542 
6543 
6544 
6545 
6546 
6547 
6548 
6549 
6550 
6551 
6552 
6553 
6554 
6555 
6556 
6557 
6558 
6559 
6560 
65G1 
6562 
6563 
6564 
6565 
6566 
6567 
6568 
6569 
6570 
6571 



026726 
026726 
026726 
026726 
026732 

026734 
026742 
026750 
026756 
026764 



026772 
026776 
027000 
027004 



027004 
027010 
027012 



012700 
104441 

000014 
012767 
012767 
012767 
012767 
012767 



000240 



000014 
177777 
000001 
012741 
006625 



SBTTL HARDWARE TEST - FI3QAI - 

* ***************************************************************************** 

- FIFO 3/4 ALARM LEVEL ACTIVE/INACTIVE TEST - 

THIS TEST VERIFIES THAT THE DUT'S FIFO 3/4 LEVEL ALARM SYSTEM 
BECOMES ACTIVE AND INACTIVE AT THE CORRECT LEVELS. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 
HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 
REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 
INTERNAL LOOPBACK MODE. 

BGNTST 

(ALLOW LTC INTERRUPTS. 



153312 
153300 
155072 
155066 
155062 



SETPRI «PRI05 



TNUM TNUM ♦ I 

MOV ♦TNUM.TSTNUM 

MOV ♦-1.CTRLCF 

MOV ♦l.ERRTYP 

MOV «5601. .ERRNBR 

MOV «EnS601.ERRMSG 



T12: 



MOV #PRI05.R0 
TRAP C$SPRI 
(INCREMENT THE ASSEMBLY TIME TEST COUNTER 
I SET UP THE TEST NUMBER. C56> 
(INDICATE THAT WE ARE IN A TEST. 
(SET ERROR TYPE AS FATAL IN ERROR TABLE. 
(SET ERROR NUMBER TO 5601. 
(SET ERROR MESSAGE AOOJtESS IN ERROR TABLE. 



{ RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
: CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
( THIS SUBROUTINE REPORTS ERROR >>>>> 5601 <«<<. 



004767 165220 
103402 

000167 000412 



004767 165460 
103402 

000167 000400 



2$: 



JSR 
BCS 
JMP 



PC.CLNRST 

2« 

60> 



(RESET THE OHU- 11. REPORT ANY ERRORS FOUND. 
(SKIP EXITING TEST A SUCCESSFUL RESET. 
(EXIT THIS TEST. 



027016 004767 165556 



FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 

JSR PC.FINACT (FIND AN ACTIVE LINE. 

BCS .*6 (SKIP EXIT OF TEST IF ACTIVE LINE FOUND. 

JMP 60« (EXIT TEST. 

'initialize THE 256 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN IS FREE FROH XON'S OR XOFF'S TO PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 



JSR 



PC.INDTPX 



(INITIALISE THE DATA PATTERN. 



027022 005267 155024 
027026 012700 000206 
027032 004767 170514 



TRANSMIT A 256 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
AT 38. 4K BAUD. 8 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

TsET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SELECTED LINE. 
( TRANSMIT THE FIRST 191 CHARACTERS ON THE FIRST AVAILABLE ACTIVE LINE. 

' INC ERRNBR iSET ERROR NUMBER TO 5602. 

MOV «206.R0 (PASS INTERNAL LOPBCK. ENABLE RX AND lAUTO. 

JSR PC.WTWLNC (INITILAISE THE LINE CONTROL REGISTER. 
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6575 
6574 
6575 
6576 
6577 
65 7t 
65 7» 
6560 
65«l 
6562 
6565 
65S4 
65S5 
65M 
65t7 
65M 
6569 
65W 
6591 
6592 
659S 
6594 
6595 
6596 
6597 
6596 
6599 
6600 
6601 
6602 
6605 
6604 
C605 
6606 
6607 
660A 
6609 
6610 
6611 
6612 
6615 
6614 
6615 
6616 
6617 
6618 
6619 
6620 
6621 
6622 
6625 
6624 
6625 
6626 
6627 
6628 



027096 
027042 
027046 
027052 
027054 
027060 
027064 
027070 
027074 



027076 
027102 
027106 
027112 
027116 
027120 
027124 



027150 
027154 
027156 
027142 
027146 
027152 



027154 
027160 
027164 
027170 
027174 
027176 
027202 



012W 
004 767 
012704 
004767 
010105 
0U702 
01270S 
004767 
109146 



005267 
012701 
016702 
004767 
109155 
012704 
004767 



005267 
010501 
012702 
012705 
004767 
105117 



005267 
012701 
016702 
004767 
105106 
012704 
004767 



027212 
027214 
027216 

027222 
027226 
027252 
027256 
027^42 



005005 
005004 
012705 

012700 
012701 
016702 
004 767 
10504( 



177670 
170594 
000012 
1*5204 

002650 
000277 
165904 



154750 
170454 
155114 

170920 

000005 
165152 



154716 

002650 
000001 
165226 



154672 
170012 
155036 
170242 

000005 
165054 



027206 010577 155014 



000500 

000005 
170005 
152772 
170174 



•177670.110 
PC.UTU.m 
•10. .M 
PC.OELAV 
Rl.fIS 

•191.. US 

pc.ooom 

50* 



|P4SS T»« lP*» CONTeNTS. 

iSET TMC LPR CONTENTS TO 3«.4K BAUD. 

iMSS OELAT TPC OF 10 niLLi SECONDS. 

lIMXT FOR LNCTRL AM) LPft REGS TO BE UPDATED. 

tCOPT TME LINE NUI«EP. 

tPASS T>C START OF T»€ DATA PATTERN TO ^x. 
iPASS TK CENCTM OF T»C DATA PATTERN. 
iTRANSniT TK DATA PATTERN. 
lEXlT IF ERROR FOUND DURING OfIA Tx. 



NOV 
J» 

nO¥ 
JSR 
NOV 
NOV 
NOV 
JSR 
BCC 

!*MAIT FOR 

I TMC FIFO. 
I - 

INC 
NOV 
NOV 
JSR 
8CC 
NOV 

j:r 

r transmit a null character which uill cause an xoff to be generated. 

* INC ERRNBR tSET ERROR NUr«£R TO 5604. 

NOV R5.R1 iPASS THE LINE NUMBER. 

NOV •6UFBAS.R2 |PASS TK START OF THE DATA PATTERN TO Tx. 

NOV •l.RS iPASS TK NUMBER OF 

JSR PC.OOONA iTX A NULL CHARACTER TO CAUSE AN XQFF. 

BCC 501 lABORT TK TEST IF ERROR FOUND DURING DNA TX. 

TuAIT FOR TK XOTF TO BE RECEIVED BEFORE CONTINUING TK TEST. 



DNA TO COMPLETE . TKN UAIT FOR TK LAST CHARACTER TO ARRIV( IN 



iSET ERROR NUr«ER TO 5605. 

iPASS TIK -OUT VALUE OF 500 HILL I SECS. 

iPASS TK AOORESS OF TK CSR. 

iMAIT FOR DNA TO COMPLETE. Tx ACTION SET. 

{BRANCH IF FIFO ENPTT. ABORT fK TEST. 

I PASS DELAY OF 5 HILL I SECS. 

lUAIT FOR LAST CHAR TO ARRIVE IN TK FIFO. 



•170454. Rl 

CSRA.R2 
PC.UAIBIS 
50* 
•5.R4 
PC. DEL AT 



INC 
NOV 
NOV 

JSft 

BCC 
NOV 

JSft 



•170012.R1 

CSRA.R2 

PC.WAIBIS 

501 

•5.R4 

PC.DELAY 



NOV RS.aCSAA 



iSET ERROR NUMBER TO 5605. 

• PASS TIK-OUT VALUE OF 10 HILL I SECS. 

iPASS TK AOORESS OF TK CSR. 

lUAIT FOR DNA TO COMPLETE. TX. ACT ION SET. 

I IF NO TX ACTION WAS RECEIVED. ABORT TK TEST. 

iPASS DEL«(V OF 5 HILL I SECS. 

iUAIT FOR XOFF TO GET INTO TK FIFO. 

{SELECT TK LIK READY FOR TRANSMISSION. 



READ T»«EE CHARACTERS. TRANSMIT OK CHARACTER UNTIL TK FIRST 192 CHARACTERS 
HAVE BEEN READ FRON TK FIFO. IE UNTIL TK HALF LEVEL IS REACKD. 

TKN READ TK FIFO UNTIL ENPTT. 
CCXMT ALL XOFF'S THAT ARE DETECTED. 



4*: 

6*: 



CLR 
CLR 
NOV 

NOV 
NOV 
NOV 

JSR 

BCC 



R5 
R4 

•192.. RS 

•5.R0 
•170005. Rl 
RBUFA.R2 
PC.WAIBIS 
141 



(CLEAR TK TX FLAG. 

{CLEAR TK CHARACTER COUNTER. 

(SET UP READ COUNTER FOR TK FIRST 



192 CHARS. 



(SET READ COUNTER. 

(INDICATE TO TEST DATA, VALID BIT. TIK OUT 5M*,. 
(INDICATE TO CKCK RECEIVE BUFFER REGISTER. 
(WAIT FOR RECEIVED CMAR OR TIKOUT. 
(EXIT LOOP IF TIK OUT. FIFO EHPTt. 
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6650 027246 






005505 




66S1 0272S0 


005002 




6652 027252 


052705 


100000 


6655 






6654 






665S 






6656 






6657 






6656 027256 


012767 


012746 


6659 027264 


004767 


164506 


6640 027270 


105446 




6641 






6642 






6645 






6644 






6645 027272 


122702 


000025 


6646 027276 


001001 




6647 027500 


005204 




6648 






6649 027502 


005700 




6650 027504 


001550 




6651 027506 


005705 




66^2 027510 


100744 




6655 027512 


112777 


000000 


6654 027520 


010446 




6655 






6656 

6657 










6656 027522 


005267 


154524 


6659 027526 


012701 


170012 


6660 027552 


016702 


152670 


6661 027556 


004767 


170074 


6662 027542 


105025 




6665 027544 


012704 


000005 


6664 027550 


004767 


164706 


6665 027554 


012604 




6666 027556 


000721 




6667 






6666 






6669 






6670 






6671 






6672 027S60 


012767 


012750 


6f 75 027566 


020427 


000077 


6674 027572 


001411 




6675 027574 


012767 


011762 


6676 027402 


012701 


006520 


6677 






66 7S 027406 






027406 


104460 




6679 027410 


000402 




6600 






6661 027412 


004767 


167254 


6682 027416 


005067 


152626 


6665 






6664 027422 







OCC (H> 

oec Rs 

BGT SI 

BIS •eiTlS.RS 



lOCCREnENT RCAO COUNTER. 
lOeCREMENT CMM) COUNTER. 

iSKIP 0ZS8L-C TX IF FIRST 192 CHARS NOT READ. 
lOISABLE ANY FURTHER TRANSniSSTONS . 



t CKCK IF TIC READ CHARACTER IS A BMP CODE. 

I IF IT IS A 8NR CODE SAVE IT ON THE QUEUE TO BE RERORTEO LATfeR. 
I ABORT THE TEST. 



AND 



154566 



I- 
8*: 



NOV 
JSft 
BCS 



45606 . • ERRHBR 

PC.CN(BM> 

161 



I SET UP ERROR NU»«ER EACH TIME AROUND LOOP, 
t CHECK IF CHARACTER IS A BHP CODE. 
iGO REPORT ERROR AND ABORT TEST IF BMP FOUND. 

ICHECK FOR XOFF CHARACTER. IF ONE IS FOUND. COUNT IT. 

t TRANSHIT A NULL &4ARACTER UNTIL THE FIRST 192 CHARS HAVE BEEN READ. 

101 t D«>B •25. R2 iCHECK IF THE RECEIVED CHARACTER WAS AN XOFF. 

BNb 12t iBRANCH IF CHARACTER WAS NOT AN XOFF. 

INC R4 t INCREMENT THE XOFF CHAR FOUND COUNTER. 



152714 



12* t TST RO 

BNE 6» 

TST R5 

BMI 4t 

MOVB M.flFOATA 

MOV R4.-CSP) 



lC»CCK READ COUNT. TO SEE IF A CHAR CAN BE TX. 

•BRANCH IF 5 CHARS NAVE NOT TET BEEN 9EA0. 

I CHECK THE TRANSMISSION ENABLED FLAG. 

ISKIP TRANSMITTING A CHARACTER IF TX DISABLED. 

iTX A NULL CHARACTER. 

I SAVE THE XOFF COUNT ON THE STACK. 



I UAIT FOR T»C CHARACTER TO BE RECEIVED BEFORE CONTINUING THE TEST. 

' INC ERRNBR tSET ERROR NUMBER TO 5607. 

MOV 4170012.R1 iPASS TIME-OUT VALUE OF 10 MILLI SECS. 

MOV CSRA.R2 (PASS THE ADDRESS OF THE CSR. 

JSR PC.UAIBIS iWAIT FOR DMA TO COMPLETE. TX.ACTION SET. 

BCC 50* (IF NO TX.ACTION WAS RECEIVED. ABORT THE TEST. 

MOV M.RA iPASS DELAY OF 5 MILLI SECS. 

JSR PC. DELAY tUAIT FOR XOFF TO GET INTO THE FIFO. 

MOV (SP)*.R4 {RESTORE THE XOFF COUNT. 

BR 4» iCO RESET THE READ COUNT AND GET NEXT CHAR. 

I'CHECK IF THE CORRECT NUMBER OF XOFFS WERE FOUND IN THE FIFO 
I REPORT ERROR IF COUNT IS INCORRECT. 



154464 14 »: 



154454 



161: 



501: 
60t: 



MOV 
CMP 
BEQ 
MOV 
MOV 

•REPORT 
ERROR 

BR 

JSR 
CLR 

ENOTST 



45608.. ERRNBR 
R4.465. 

601 

•ER0505.ERRBLK 
4EM5402.R1 



tSET ERROR NUMBER TO 5606. 

•COMPARE THE EXPECTED AND ACTUAL XOFF COUNTS. 
lEXIT TEST IF SUCCESS. 

•SELECT THE CORRECT ERROR REPORTING ROUTINE. 
•PASS THE MESSAGE TO BE REPORTED. 
THE ERROR "FIFO BAD. ALARM SIGNAL DEFECTIVE". 

I > » » > > ERROR <<<<<. 

TRAP C<ERROR 

•EXIT THIS TEST. 



601 

PC.TSA6RT 
CTRLCF 



•REPORT TEST ABORTED. ERROR « INDICATE5 FAULT. 
•INDICATE 'HAT yE ARE NOT WITHIN A TEST. 



027 A22 104401 



SEO m 



L 10041: 



TRAP 



C»ETST 



CZDMV80 DN.* n ruNC TST PART2 
HARDUARe TEST 



FIMAVL 



Li4 
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6686 
f»687 
6688 
6689 
6690 
6691 
6692 
6695 
6694 
6695 
6696 
6697 
6698 
6699 
6700 

6701 



0702 
6703 
6704 
6705 
6706 
6707 
6708 
6709 
6710 
6711 
6712 
6713 
6714 
6715 
6716 
6717 
6718 
6719 
6720 
6721 
6722 
6723 
6724 
6725 
6726 
6727 
6728 
6729 
6730 
6731 
6732 
6733 
6734 
6735 
6736 
6737 
6738 
6739 



.SBTTL HARDWARE TEST 



- FIMAVL - 



027424 
027424 
027424 
027424 
0274S0 

027432 
027440 
027446 
027454 
027462 
027470 



027476 
027502 
027504 
027510 



027510 
027514 



012700 
104441 

000015 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103402 

0C0167 



004767 
103167 



000240 



000015 
177777 
000001 
013105 
006702 
011762 



164514 
000364 

164754 



152614 
152602 
154374 
154370 
154364 
154360 



027516 004767 165056 



. FIFO HALF LEVEL ACTIVE/INACTIVE TEST 

THIS TEST CHECKS THAT THE DUT'S FIFO HALF LEVEL ALARM SYSTEM 
BECOMES ACTIVE AND INACTIVE AT THE CORRECT LEVELS. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 
HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 
REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 
INTERNAL LOOPBACK MODE. 



BGNTST 
SETPRI 



TNUn 

MOV 

MOV 

NOV 

MOV 

MOV 

MOV 



4PRI05 



■ TNUM * 1 
«TNUM.TSTNUn 
•-I.CTRLCF 
♦l.ERRTYP 
•5701..ERRNBR 
«EM5701.ERRMSG 
4ER0503.ERRBLK 



T13:: 

t ALLOW LTC INTERRUPTS. 

MOV «PRI05.R0 
TRAP C»SPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

tSET UP THE TEST NUMBER. (57) 

t INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET ERROR NUMBER TO 5701. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

{SELECT THE ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 5701 ««<<. 



JSR 
BCS 
JMP 



PC.CLNRST 

2t 

60t 



2»: 

!VlND AN ACTIVE LINE ON WHICH TO PERFORM THE 'EST, 



{RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
(SKIP EXITING TEST A SUCCESSFUL RESET. 
{EXIT THIS TEST. 



{ - 



JSR 
BCC 



PC.FINACT 
601 



(FIND AN ACTIVE LINE. 

(EXIT IF NO ACTIVE LINES AVAILABLE. 



( INITIALIZE THE 256 BYTE DATA PATTERN. 

( ENSURE THE DATA PATTERN IS FREE FROM XON'S OR XOFFS TO PREVENT ERRORS. 
{ NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE T»< SAME. 
{ - 



JSR 



PC.INOTPX 



(INITIALISE THE DATA PATTERN. 



( FILL THE FIFO AND THE UART'S 3 s,.VW BUFFER BY TRANSMITTING 225 CHARS 

( (IE 225 » 34 XOFF'S). TRANSHIT 0». A PATTERN USING DMA. ON A SINGLE CHANNEL 

i AT 38. 4K BAUD, d BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 



( - 



027522 
027526 



005267 
004767 



154324 
167014 



( SET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SELECTED LINE. 
{ TRANSMIT THE 225 CHARACTERS ON THE FIRST AVAILABLE ACTIVE LINE. 

' INC ERRNBR (SET ERROR NUMBER TO 5702. 

JSR PC.SETPAR (SET UP PARAMETERS FOR TRANSMISSION. 



TUNC rST PA 



VL 
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SEQ 174 



6740 


027532 


012700 


000341 


6741 


027536 


004767 


167242 


6742 


027542 


103152 




6743 


027544 


010105 




6744 








6745 








6746 








6747 








6748 


027546 


005267 


154300 


6749 


027552 


004767 


167734 


to 750 


027556 


103144 




6751 








6752 








6755 








6754 








6755 








6756 


027560 


005267 


154266 


6757 


027564 


012700 


000202 


6758 


027570 


004767 


166060 


6759 


027574 


103135 




6760 


027576 


005267 


154250 


6761 


027602 


005701 




6762 


027604 


001125 




6763 








6764 








6765 








6766 








6767 


027606 


010577 


152414 


6768 


027612 


112777 


000000 


6769 


027620 


005267 


154226 


6770 


027624 


004767 


167662 


6771 


027630 


103117 




6772 








6773 








6774 








6775 


027632 


005267 


154214 


6776 


027636 


012700 


000003 


6777 


027642 


004767 


166006 


6778 


027646 


103110 




6779 


027650 


005267 


154176 


6780 


027654 


005701 




6781 


027656 


001102 




6782 








6783 








6784 








6785 


027660 


012700 


000076 


6786 


027664 


010501 




6787 


02766C 


005267 


154160 


6788 


027672 


004767 


167106 


6789 


027676 


103074 




S790 








6791 








6792 








6793 








6794 








6795 


027700 


005267 


154146 


6796 


027704 


004767 


167602 



MOV ♦225,,R0 iPASS LENGTH OF DATA PATTERN. 

JSR PC.TXDATP I TRANSMIT DATA PATTERN. 

BCC 501 lEXIT IF- ERROR FOUND DURING TX. 

MOV R1.R5 iCOPY THE LINE NUMBER. 



t ♦ 
I 
I 
t 



WAIT FOR DMA TO COMPLETE. THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
THE FIFO. 

INC ERRNBR iSET ERROR NUMBER TO 5703. 

JSR PC.WAITTX jUAIT FOR TRANSMISSION TO COMPLETE. 

BCC 501 I GO REPORT ERROR IF TX FAILED TO COMPLETE. 



t ♦ 



READ THE FIRST 130 CHARACTERS FROM THE FIFO. 
( REPORT THE ERROR. IF ANY BMP COOES ARE FOUND 
I AND ABORT THE TEST. 



IF ANY XON'S ARE FOUND 
THEN SAVE THEM ON THE QUEUE 



INC ERRNBR iSET ERROR NUMBER TO 5704. 

MOV «130..R0 (PASS THE NUMBER OF CHARS TO READ. 

JSR PC.REA06X iREAO THE FIRST 130 CHARS FROM THE FIFO. 

BCC 50t iGO REPORT ERROR IF BMP CODE FOUND. 

INC ERRNBR tSET ERROR NUMBER TO 5705. 

TST Rl I CHECK IF AN XON WAS FOUND. 

BNE 30t iGO REPORT ERROR IF AN XON WAS FOUND. 



t 

t - 



TRANSMIT A NULL CHARACTER (MtXCH CAUSES AN XOFF TO BE GENERATED). 



R5.8CSRA I SELECT THE LINE READY FOR TRANSMISSION. 

•O.VOATA I TRANSMIT A NULL CHARACTER. 

ERRNBR (SET ERROR NUMBER TO 5706. 

PC.UAITTX lUAIT FOR TX TO COMPLETE, 

sot iGO REPORT ERROR IF TX DID NOT COMPLETE. 

CAUSE T»C XON TO BE GENERATED. 

ERRNBR I SET ERROR NU»«ER TO 5707. 

#5.R0 iSET THE READ COUNT TO 3. 

PC.REAOBX iREAO 3 CHARACTERS FROM T»C FIFO, 

sot iGO REPORT ERROR IF FIFO Er«>TT. 

ERRNBR tSET ERROR NU»«ER TO 5708. 

Rl iCHEOC IF AN XON UAS FOUM>. 

401 iGO IKPQRT EMOR IF AN XON UAS FOUM). 

TRWISNIT 62 C»MIMCTERS TO BRACKET T»C XON AM) FILL THE FIFO WITH 191 CHARS. 

NOV 462.. RO iPASS LENGTH OF DATA PATTERN. 

NOV RS.Rl tPASS THE LINE NUWER. 

INC ERRICR I SET ERROR NUI«ER TO 5709. 

JSR PC.TXDATP iTRANSNIT DATA PATTERN. 

BCC 501 lEXIT IF ERROR FOUND DURI.« TX. 

I MAIT FOR DMA TO COMPLfeTE. THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IS 
I THE FIFO. 



MOV 
MOVB 
INC 
JSR 
BCC 

Tread three characters, to 

INC 
MOV 
JSR 

ecc 

INC 
TST 



t • 

t 

I - 



t - 



INC 
JSR 



ERRNBR 
PC.WAITTX 



iSET ERROR NUMBER TO 5710. 
I WAIT FOR TX TO COMPLETE. 
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3EQ 175 



6797 
6798 
6799 
6800 
6801 
6802 
6803 
6804 
6805 
6806 
6807 
6808 
6809 
6810 
6811 
6812 
6813 
6814 
6815 
6816 
6817 
6818 
6819 
6820 
6821 
6822 
6823 
6824 
6825 
6826 
6827 
6828 
6829 
6830 
6831 
6832 
6833 
6834 
6835 
6836 
6837 
6838 
6839 
6840 
6841 
6642 

6843 
6644 
6645 
6646 
6647 
6646 



027710 103067 



027712 
027716 
027722 
027726 
027730 
027734 
027736 
027740 
027744 
027750 
027754 
027756 
027762 
027764 
027770 
027772 
027776 
030000 
030002 
030006 
030012 
030014 
030020 
030022 
030026 



030030 
0300M 
030040 
030044 
030046 
030052 
030054 
030056 
030060 

030064 
030064 
030066 

030070 
030074 

030100 
030100 
030100 



005267 
012700 
004767 
103060 
005267 
005701 
001052 
005267 
012701 
016703 
011302 
120227 
001040 
005267 
011302 
120227 
C01032 
011302 
005267 
120227 
001024 
005267 
011302 
120227 
001016 



012700 
005267 
004767 
103011 
005267 
005701 
001003 
000406 
012701 



104460 
000402 

004767 
005067 



104401 



BCC 



50$ 



iGO REPORT ERROR If TX FAILED TO COMPLETE, 



154134 
000176 
165726 

154116 



154106 
006520 
152254 

000000 

15406<! 

000023 

134044 

000021 

154032 
000000 



000075 
1S4012 
165610 

154000 



006520 



166576 
152150 



t READ THE FIRST 126 CHARACTERS. 
; READ THE NEXT 4 CHARACTERS AND 
t NULL. XOFF, XON. NULL. 

i - 



CHECK IF THEY ARE IN THE FOLLOWING ORDER 



INC 


EPRNBR 


tSET ERROR NUMBER TO 5711. 


MOV 


^126. .RO 


}SET UP READ COUNTER. 


JSR 


PC.READBX 


iREAO THE FIRST 126 CHARS. 


BCC 


501 


iGO REPORT THE ERROR IF FIFO EHPTY. 


INC 


ERRNBR 


iSET ERROR NUHBER TO 5712. 


TST 


Rl 


t CHECK IF AN XON WAS FOUND. 


BNE 


401 


iGO REPORT ERROR IF AN XON WAS FOUND. 


INC 


ERRNBR 


iSET ERROR MUHBER TO 5713. 


nov 


#EM5402.R1 


iPASS THE MESSAGE TO BE REPORTED. 




RBUFA.R3 


iGET THE RECEIVER BUFFER ADDRESS. 


rtov 


(R3)«R2 


sREAO THE NULL CHARACTER FROM THE FIFO. 


CMPB 


R2»«000 


iCHECK IF IT IS A NULL CHARACTER. 


BNE 


401 


sGO REPORT THE ERROR IF NOT THE SAME. 


INC 


ERRNBR 


iSET ERROR NUMBER TO 5714. 


HOV 


(RS),R2 


iREAO THE XOTF FROM THE FIFO. 


CMPB 


R2,#2S 


•CHECK IF THE READ CHAR IS AN XOFF. 


BNE 


401 


iGO REPORT THE ERROR IF NOT THE SAME. 


HOV 


(RS).R2 


{READ THE XON FROH THE FIFO. 


INC 


ERRNBR 


iSET ERROR NUHBER TO 5715. 


CMPB 


R2.«21 


1 CHECK IF THE READ CHARACTER IS AN xON. 


BNE 


40$ 


iGO REPORT THE ERROR IF NOT THE SAME. 


INC 


ERRNBR 


iSET ERROR NUr«ER TO 5716. 


HOV 


(RS).R2 


iREAO THE NULL CHARACTER FROM THE FIFO. 


CHPB 


R2.#000 


iCHECK IF IT IS A NULL CHARACTER. 


BNE 


401 


iGO REPORT THE ERROR IF NOT T»€ SAME. 



|*READ THE REHAINING CHARACTERS FROM THE FIFO, 
t - 
6$: 



30$: 
40$ t 



50$: 
60$: 



MOV 

INC 
JSR 
8CC 

INC 

TST 
BNE 

BR 

NOV 

ERROR 

BR 

JSR 
CLR 

ENOTST 



♦ 6l.^«0 
ERRNBR 
PC.REAOBX 
5 0$^^ 
ERRNBR 
Rl 
40$ 
60* 

«En5402.Rl 



60$ 

PC.TSABRT 
CTRLCF 



tSET UP READ COUNTER. 
iSET ERROR NUMBER TO 5717. 
iREAO THE FIRST 61 CHARS. 
iGO REPORT THE ERROR IF FIFO EtVTt. 
I SET ERROR NUrfiER TO 5718. 
tCHECK IF AN XON MAS FOUND. 
iGO REPORT ERROR IF AN XON WAS FOUND. 
lEXlT THE TEST, 
t SET UP THE MESSAGE 
J TIFO ALARM SIGNAL DEFECTIVE* 



>>*>> ERROR <<<<< 



lEKIT THE TEST. 



TRAP 



C$ERROR 



iREPORT TEST ABORTED. ERROR « INDICATES FAUL^. 
{INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10042: 



TRAP 



C$ETST 
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SEQ 



6850 
6851 
6852 
6853 
6854 
6855 
6856 
6857 
6858 
6859 
6860 
6861 
6862 

6863 030102 
030102 

6864 030102 
030102 
030106 

6865 
6866 
6867 
6868 
6869 
6870 
6871 
6872 
6873 
6874 
6875 
6876 
6877 
6878 
6879 
6880 

6881 030164 
030164 
030170 
030174 
030200 
030204 
030206 

6882 030212 



030110 
030116 
030124 
030132 
030140 
030146 



030152 
030156 
030160 



012700 
104441 
000016 
012767 
012''67 
012767 
012767 
012767 
005067 



004767 
103402 
000167 



012746 
012746 
016746 
012746 
104437 
062706 



000240 



000016 
177777 
000001 
013251 
006757 
152100 



166124 
000732 



000300 
017702 
152014 
000003 

000010 



152136 
152124 
1537li 
15S71,i 
153706 



.SBTTL 

I* 
»* 
J* 
I* 
»• 

!• 
J* 
»* 
J* 



HARDUARE TEST 



RXTIMER 



- RXTIMER REG TEST - 
THIS TEST VERIFIES THAT THE RXTIMER DELAYS ANY RX-INTS BY THE 
REQUESTED AMOUNT AND THAT WHEN THE RXFIFO IS MORE THAN 5/4 FULL 
THE RXTIMER VALUE IS IGNORED AND AN INTERRUPT OCCURS IMMEDIATELY. 

DUE TO THE DIFFERANCES IN LTC HANDLING OF DIFFERENT VERSIONS OF 
THE ORS AND LTC AVAILABILITY ON DIFFERENT PDP-11 MACHINES THE 
RX-INT CAN ONLY BE TIMED TO WITHIN */- 200 OF THE RXTIMER VALUE. 

THIS TEST IS PERFORMED IN INTERNAL LOOPBACK ON THE FIRST ACTIVE LINE. 



BGNTST 
SETPRI 



TNUM 

NOV 

HOV 

MOV 

MOV 

MOV 

CLR 



♦PR 105 



• TNUM ♦ 1 
♦TNL'i.TSTNUM 
♦-1.CTRLCF 
•l.ERRTYP 
•$801..ERRNBR 
•EM5801.ERRnSG 
EXOEftR 



{ALLOW LTC INTERRUPTS. 



T14:: 



MOV 0PRI05.R0 
TRAP C»SPRI 
•INCREMENT ASSEMBLY TIME TEST COUNTER 
I SET UP THE TEST NUMBER. 
I INDICATE THAT WE ARE IN A TEST. 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET THE ERROR NUMBER TO 5801. 
I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
I CLEAR THE -EXIT ON ERROR" FLAG. 



t ♦ 
t 
I - 



RESET THE DEVICE AND LEAVE THE SELFTEST COOES IN THE FIFO. 



JSR 
8CS 
JMP 



PC.RESETT 

.♦6 

60t 



{RESET THE OUT. 
{CONTINUE IF FIFO PURGED 
{REPORT THE RESET FAILURE. 



SET UP THE INTERRUPT SERVICE ROUTINE THAT OECTECTS THE RXINT. 
SETveC RXVECA.«RX0ECT.«PRI06 



SETPRt •PftI04 





030212 


012700 


000200 








030216 


104441 








6883 


030220 


005067 


152042 


CLR 


RXINTC 


6884 








{ ♦ 




6885 








{ ENABLE RX-INTS AND WAIT 


G886 








t- 




6687 


030224 


004767 


166224 


JSR 


PC.RXIEl 


oooo 


030230 


012704 


000005 


NOV 


«5.R4 


6669 


030234 


004767 


164022 


JSR 


PC. DELAY 


6690 


030240 


004767 


166150 


JSR 


PC.RXIEO 


6691 


0302)4 


005267 


153602 


INC 


tRRNBR 


6692 


030250 


005767 


152012 


TST 


RXINTC 


6693 


030254 


001002 




BNE 


.*6 


6894 


030256 


000167 


000630 


JMP 


50» 


6895 








1 ♦ 





(AtLOU DEVICE INTERRUPTS. 



(CLEAR THE RX>INT COUNT. 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

MOV 
TRAP 



«PRI06. (SP) 
•RXOECT. CSP) 
RXVECA. (SP) 
*3.-CSP) 
C»SVEC 
OlO.SP 

4PRI04.R0 
C»SPRI 



{ENABLE RX-INTS. 

tSET THE DELAY QF 5 HILLI SECS. 

(DELAY WHILE THE INT OCCURS. 

(DISABLE RX-INTS. 

(SET THE ERROR MUIQER TO SB02. 

(TEST IF AN INTERRUPT OCCUREO. 

(CONTINUE IF AN INTERRUPT OCCURED. 

(REPORT THE ERROR IF NO INTERRUPT. 
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SEQ 17/ 



6896 








6897 








5898 








6899 


030262 


004767 


164202 


6900 


030266 


103402 




6901 


030270 


000167 


000622 


6902 


030274 


012700 


000204 


6903 








6904 


030300 


004767 


167246 


6905 


030304 


012700 


177670 


6906 


030310 


004767 


167266 


6907 


030314 


012704 


000012 


6908 


03032C 


004767 


16373e 


6909 








6910 








6911 








6912 








6913 








6914 


030324 


010167 


000616 


6915 


030330 


012705 


000020 


6916 


030334 


012767 


013253 


6917 


030342 


004767 


165022 


6918 


030346 


103402 




6919 


030350 


000167 


000536 


6920 


030354 


016701 


000566 


6921 


030360 


012703 


000277 


6922 


030364 


005267 


153462 


S923 


030370 


004767 


163726 


6924 








6925 


030374 


103402 




6926 


030376 


000167 


000510 


6927 








6928 








6929 








6930 








6931 


030402 


010501 




6932 


030404 


006301 




6933 


030406 


006301 




6934 


030410 


105077 


151612 


6935 








6936 


030414 


010500 




6937 


030416 


005300 




6938 


030420 


110077 


151604 


6939 


030424 


012704 


000002 


6940 


030430 


004767 


163626 


6941 


030434 


012702 


000001 


6942 


030440 


010203 




6943 


030442 


012704 


002266 


6944 


030446 


005067 


151614 


6945 


030452 


012767 


000100 


6946 


030460 


016777 


151572 


6947 


030466 


004767 


164236 


6948 


030472 


103415 




6949 








6950 








6951 








6952 


030474 


010502 





; SET INTERr4AL LOOPBACK ON 
i THE LPR'S TO 38. 4K BAUD. 



THE FIRST ACTIVE LINE AND ENABLE RECIEVERS. 
8 BITS/CHARA. ODD PARITY. 2 STOP BITS. 



SET UP 



JSR 
BCS 
JHP 
MOV 

JSR 
HOV 

JSR 
HOV 

JSR 



PC.FINACT 

.♦6 

60 1 

•204.ro 

PC.UTULNC 
♦I 77670, RO 
rC.UTULPR 
♦10. .R4 
PC. DELAY 



(FIND AN ACTIVE LINE FOR THIS TEST. 

{CONTINUE IF A LINE HAS BZEN FOtJND. 

I EXIT THE TEST IF NO LINES ACTIVE. 

I PASS PARAMETER FOR INTERNAL LOOPBACK. 

(ENABLE RECIEVERS. 

{INITIALISE THE LINE CONTROL REGS. 

I PASS THE LPR CONTENTS. 

iSET THE LPR'S TO 38. 4K BAUD. 

»PASS DELAY TIME OF 10 MILLI SECS. 

I WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 



I SET UP THE LOOP TO TEST THE RXTIMER WITH DELAYS OF 15,31.63.127 AND 255 MS. 
t DMA 191 CHARACTERS INTO THE FIFO AND THEN ENABLE INTERRUPTS. VERIFY THAT 
: THE INTERRUPT OCCURS WITHIN */- 20« OF THE RXTIMER VALUE. 



153510 2«: 



MOV Rl.70» 

MOV #16. .R5 

MOV tSSOS. .ERRNBR 

JSR PC.PUFIFO 

BCS . »6 

JMP SOI 

MOV 701. Rl 

MOV •191.. R3 

IMC ERRNBR 

JSR PC.DMABOr 

BCS . •6 

JMP SOI 



t ♦ 



I CALCULATE THE TIME-OUT VALUE 
t IMZT FOR THE RX-INT. 



t - 



151576 
151540 



I ♦ 



MOV 


R5.R1 


ASL 


Rl 


ASL 


Rl 


CLR8 


BCSRA 


MOV 


R5.R0 


DEC 


RO 


MOVB 


RO.SRXTMA 


NOV 


•2.R4 


JSR 


PC. DELAY 


MOV 


•eiT0.R2 


MOV 


R2.R3 


NOV 


•RXINTC.R4 


CLR 


RXINTC 


NOV 


•eiT06.IESTAT 


NOV 


IESTAT.8CSRA 


JSR 


PC.MSLGET 


BCS 


41 


THE 


TIME-OUT ERROR. 


MOV 


R5,R2 



I SAVE THE LINE NUMBER. 

I SET THE FIRST CRXTIMER VALUE ♦I). 

tSET THE ERROR NUMBER TO 5803. 

iPURGE THE RXFIFO. 

{CONTINUE IF SUCCESSFUL. 

iREPORT THE ERROR IF FIFO FAILED TO PURGE. 

I PASS THE LINE NUMBER. 

iPASS THE NUMBER OF CHARS TO DMA. 

iSET THE ERROR NUMBER TO 5804. 

I PERFORM THE DMA FROM AOOR «eUFBAS . T. :IS SUBR 

{PRODUCES ERRORS >>>>> 5804 TrfHJ 5805 <<<<<. 

(CONTINUE IF SUCCESSFUL. 

{REPORT THE ERROR IF ONE OCCURED. 

FOR T»C RXINT. SET UP THE RXTIMER. AND 



{COPY THE RXTIMER VALUE • 1. 

i MULTIPLY BY 4 TO OBTAIN. 

(THE TIME-OUT FOR THE RXINT. 

(CLEAR T»< INO.AOOR.REG BITS OF T»C CSR RZAOY . 

(FOR THE WRITE TO THE RXTIMER REG. 

(COPY THE RXTIMER VALUE 'l. 

(GET THE RXTIMER VALUE 

{LOAD THE RXTIMER REG. 

{SET DELAY OF 2 MS. 

(DELAY TO ALLOW THE RXTIMER VALUE TO UPDATE. 

(I»OICATE TO TEST BITO. 

(INDICATE TO TEST FOR A "l". 

{PASS ADOR OF WORD TO TEST. 

{CLEAR THE RX-INT COUNT. 

{SET THE RX-INT-ENBL BIT IN lESTAT. 

(ENABLE RX-INTS. 

(WAIT FOR THE INT TO OCCUR. 

{AVOID ERROR REPORT IF THE INTERRUPT OCCURED. 



{PASS THE RXTIMER VALUE TO. 



J 14 
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SEQ 178 



6953 
6954 
6955 
6956 
6957 
6958 



6959 
6960 
6961 
6962 
6963 
6964 
6965 
6966 
6967 
6968 
6969 
6970 
6971 
6972 
6973 
6974 
6975 
6976 
6977 
6978 
6979 
6980 
6981 
6962 
6983 
6984 
6985 
6986 
6987 
6988 
6989 
6990 
6991 
6992 
6993 
6994 
6995 
6996 
6997 
6996 
6999 



7000 
7001 



030476 
030500 



030504 
030504 
030506 
030510 
030512 

030514 
030522 
030524 



030526 
030534 
030536 
030540 
030544 
030SS0 
030SS2 



030556 
030562 
030566 
030572 

030576 
030600 
030604 
030610 
030614 
030620 
030624 



030626 
030630 
030632 



030636 
030636 
030640 
030642 
030644 



005302 
012701 



104455 

013256 
006757 
012112 

03276V 
001575 
000454 



012767 
010S02 
005302 
004767 
005767 
001162 
004767 



016701 
012703 
005267 
004767 

103145 
005067 
012701 
012702 
004767 
004767 
103414 



010502 
005302 
012701 



104455 
013262 
006757 
012112 



007265 



DEC R2 (THE ERROR REPORTING ROUTINE. 

MOV ♦EM5605,Rl jPASS THE MESSAGE, 

I "RXTIMER BAD. TIME-OUT OCCUREO WAITING FOR 

I THE RX-INT". 

ERROF 5806.EM5801.ER5801 {REPORT ERROR 5806. 



000100 151466 



BIT ♦BIT06, OPTION 
BEQ 60> 
BR 6) 



TRAr- C«ERDF 

.WORD 5806 

•WORD EM5801 

.WORD ER5801 

(HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 

lEXIT THE TEST IF IT HASN'T. 

iBRANCH TO TEST ANOTHER RXTIMER VALUE. 



TcHECK THAT THE INTERRUPT OCCUREO WITHIN 20* 
t THIS SUBROUTINE REPORTS ERROR >>>>> 5607 <<<<<. 



OF THE RXTIMER VALUE. 



013257 153316 



163302 
1S1S02 



i - 
41: 



165636 



000364 
000001 
153260 
16SS24 



151462 
000005 
002266 
165634 
166612 



MOV «5a07. .ERRNBR 

MOV R5.R2 

DEC R2 

JSR PC.CKRXTM 

TST EXOERf) 

BNE 60* 

JSR PC.RXIEO 

!*0»1A ANOTHER CHARACTER TO FILL 
I RX-INT OCCURS IMMEDIATELY . 

t - 



HOV 
MOV 
INC 
JSR 

see 
aR 

MOV 
MOV 
JSR 
JSR 
BCS 



70«.R1 
♦l^R3 

PC.ONAaUF 

sot 

RXINTC 
•5.R1 

4RXINTC.R2 
PC.RXIEl 
PC.UAIBIS 
6t 



I SET THE ERROR NUMBER TO 5807. 
jPASS THE RXTIMER VALUE TO. 
I THE "CHECK TIME" SUBR. 

t CHECK THE TIME TAKEN AND REPORT ANY ERROR. 
J TEST THE "EXIT ON ERROR" FLAG. 
J EXIT IF SET, 
{DISABLE RX-INTS. 

THE FIFO TO THE 75* LEVEL. MC CHECK THAT THE 



tPASS THE LINE NUr«ER. 

iPASS THE NUMBER OF CHARS TO DMA. 

tSET THE EmOR NUTSER TO 5606. 

tPERFORM THE DMA FROM ADO.') «BUFBAS.THIS SUBR 

{PRODUCES ERRORS >»>> 5606 TWU 5609 <<<<<. 

{REPORT THE ERROR IF ONE OCCUREO. 

(CLEAR THE RX-INT COUIiT. 

(SET THE TIME-OUT TO 5 MS. 

(PASS AOOR OF WORD TO TEST. 

(ENABLE INTERRUPTS. 

(WAIT FOR THE INT TO OCCUR. 

(AVOID THE ERROR IF AN INTERRUPT OCCUREO. 



{ ♦ 



REPORT THE ERROR. RX-INT DID NOT XCUR IMHEDIATLEY >>>» 5610 <<<<<. 



007077 



MOV 
DEC 
MOV 



R5.R2 
R2 

«EM580S.R1 



(PASS THE RXTIMER VALUE. 
(PASS THE MESSAGE. 

{ "RXTIMER BAD. RX-INT DID NOT OCCUR 
( IMMEDIATELY WHEN RXFIFO 3/4 FULL". 



ERRDF 5810.EMS801.ER5801 ( REPORT ERROR 5610. 



TRAP C$ER0F 

.WORD 5610 

.WORD EMS601 

.WORD ER5601 



030646 032767 000100 151334 



BIT «BIT06. OPTION (HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
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SEQ 17't 



7002 
7003 
7004 
7005 
7006 
7007 
7008 
7009 
7010 
7011 
7012 
7013 
7014 
7015 
7016 
7017 
7018 
7019 
7020 
7021 
7022 
7023 
7024 
7025 
7026 
7027 
7028 
7029 
7030 
7031 
7032 
7033 
7034 
7035 
7036 
7037 
7038 
7039 
7040 
7041 
7042 



030654 001520 



BEQ 



60 1 



tEXIT THE TEST IF IT HASN'T. 



J SELECT ANOTHER VALUE TOR THE RXTIMER OR IF ALL VALUES HAVE BEEN TESTED THEN 
I TEST THE RXTIMER WITH INOEFINATE DELAY SET. 



030656 004767 165532 

030662 006305 

030664 020527 000400 

030670 003621 



6»! 



JSR 
ASL 
CMP 

BLE 



PC.RXIEO 
W5 

R5.«256. 
21 



I DISABLE INTERRUPTS. 

jMULTIPLY (RXTIMER VALUE ♦ 1) Bf 2. 

{HAVE ALL VALUES BEEN TESTED ? 

t BRANCH AND TEST ANOTHER VALUE IF NOT. 



s VERIFY THAT WHEN RXTIMER VALUE IS 0 THE INTERRUPT IS DELAYED INDEFINITELY, 
t UNLESS THE PXFIFQ IS 75* FULL OR MORE. 



030672 


012767 


013263 153152 


rn)v 


«5811..ERRNBR 


iSET THE ERROR NUMBER TO 5811. 


030700 


004767 


164464 


JSR 


PC.PUFIFO 


iPURGE THE RXFIFO. 


030704 


103102 




BCC 


501 


t REPORT THE ERROR IF THE FIFO FAILED TO PURGE. 


030706 


016701 


000234 


MOV 


701. Rl 


tPASS THE LINE NUMBER. 


030712 


012703 


000277 


HOV 


«191..RS 


tPASS THE NUMBER OF CHARS TO DMA. 


030716 


005267 


153130 


INC 


ERRNBR 


tSET THE ERROR MUMBER TO SS12. 


030722 


004767 


163374 


JSR 


PC.DMABUF 


iPERFORH THE DMA FROM AOOR 4BUFBAS.THIS SUBR 
tPftOOUCES ERRORS >>>» 5612 THRU 5613 <<<<<. 


030726 


103071 




BCC 


sot 


iREPORT THE ERROR IF ONE OCCURED. 


030730 


012701 


001750 


NOV 


•1750.R1 


t INDICATE TO TEST SITO UITH TIME OUT OF 1 SEC. 


030734 


012702 


002266 


HOV 


«ftXINTC.R2 


iPASS THE AOOR OF T»C WORD TO TEST. 


030740 


005067 


151322 


CLR 


RXINTC 


tCLEAR THE RX-INT COUNT. 


030744 


105077 


151256 


CLRe 


8CSRA 


{CLEAR T»C IND.AOOR.REG BITS OF THE CSR READY. 
tFOR THE URITE TO THE RXTIMEit REG. 


030750 


105077 


151254 


CLRB 


aRXTMA 


iSET THE VALUE 0 IN T»C RXTIMER. 


030754 


012704 


000002 


MOV 


•2.R4 


iSET THE DELAY OF 2 MS. 


030760 


004767 


163276 


JSR 


PC. DELAY 


tOELAY TO ALLOU THE RXTIMER VALUE TO UPDATE. 


030764 


004767 


165464 


JSR 


PC.RXIEl 


1 ENABLE RX-INTS. 


030770 


004767 


166442 


JSR 


PC.UAIBIS 


iUAIT FOR T»C INTERRUPT TO OCCUR. 


030774 


103007 




BCC 


8» 


t AVOID THE ERROR IF NO INTERRUPT. 



; ♦ 



t REPORT THE ERROR* RX-INT OCCURED UITH RXTIMER VALUE ZERO.>>>>> 5614 <<<<<. 



030776 012701 007201 



MOV 



•En5804.Rl 



sPASS THE MESSAGE, 
i -RXTIMER BAD. RX- 
t VALUE ZERO". 



INT OCCURED UITH RXTIMER 



031002 
031002 
031004 
031006 
031010 



104455 
013266 
006757 
011762 



7043 












7044 


031012 


000441 




BR 


60» 


7045 












7046 








!*VERIFY THAT 


UHEN THE FIFO IS 


7047 












7048 


031014 


004767 


165374 


8>: JSR 


PC.RXIEO 


7049 


031020 


012767 


013267 


153024 HOV 


•5615. .ERRNBR 


7050 


031026 


016701 


000114 


MOV 


701. Rl 


7051 


031032 


012703 


000001 


MOV 


41.RS 


7052 


031036 


004767 


163260 


JSR 


PC.DMABUF 


7053 












7054 


031042 


103023 




BCC 


501 



ERROF S614.EM5601.ER0503 i REPORT ERROR 5814. 



lEXIT THE TEST. 



TRAP CtERDF 

.UORO 5814 

.UORO EM5801 

.UORO ER0503 



t DISABLE RX-INTS. 

tSET THE ERROR NUMBER TO 5815. 

I PASS THE LINE NUMBER. 

I PASS THE NUMBER OF CHARS TO DMA. 

(PERFORM THE DMA FROM ADDR ABUFBAS.THIS SUSP 

(PRODUCES ERRORS >>>>•' 5815 THRU 5816 <<<<<. 

(REPORT THE ERROR IF ONE OCCURED. 



CZCHVBQ OHU-11 fUNC TST PART2 K 
HARDWARE TEST RXTINER 



70S5 


031044 


005C67 


151^?16 

&v 


7056 


031050 


012701 


000005 


7057 


031054 


012702 


002266 


7058 


031060 


004767 


165370 


7059 


031064 


004767 


166346 


7060 


031070 


103412 




7061 








7062 








7063 








7064 


031072 


005002 




7065 


031074 


0J2701 


007077 


7066 








7067 


031100 
031100 
031102 
031104 
031106 


104455 
013271 
006757 
012112 




7068 








7069 


031110 


000402 




7070 








7071 


031112 


004767 


1655E4 


7072 


031116 








031116 


012700 


000340 




031122 


104441 




7073 


031124 


004767 


165264 


7074 


031130 








031130 


016700 


151060 




031134 


104436 




7075 


031136 


J0S067 


151106 


7076 


031142 
031142 
031144 


104432 
000004 




7077 


031146 


000000 




7078 


031150 
031150 
031150 


104401 





ril200 15 -MAR -84 09:28 



PAGE 118-4 



StQ la. 



CLR RXXNTC t CLEAR THE RX-INT COUNT. 

MOV ♦5,R1 tSET THE TIME-OUT TO 5 MS. 

MOV «RXlNrC.R2 (PASS AOOR OF WORD TO TEST. 

JSR PC.RXIEl (ENABLE INTERRUPTS. 

JSR PC.UAIBIS I WAIT FOR THE INT TO OCCUR. 

BCS 601 lEXIT THE TEST IF AN INTERRUPT OCCURED. 

REPORT THE ERROR. RX-INT 010 NOT OCCUR IMMEOIATLEY , > > > > > 5817 <<<<<. 

CLR R2 iPASS THE RXTIMER VALUE. 

MOV 4EMS803.R1 iPASS *HE MESSAGE. 



ERROF 5817.EM5801.ERS801 i REPORT ERROR 5817. 



TRAP 
.UORO 
.WORD 
.WORD 



S0«: 
601: 



BR 

JSR 
SETPRI 



JSR 

CLRVEC 



601 

PC.TSABRT 
«PRI07 



PC.RXIEO 
RXVECA 



lEXIT THE TEST. 



CIERDF 
5817 
EM5801 
ER5801 



701: 



CLR 
EXIT TST 



.UORO 
ENDTST 



CTRLCF 



iREPORT NON-RELATED TEST ERROR. 
tOISABLE ALL INTERRUPTS. 

nov 

TRAP 

{DISABLE DEVICE RX-INTS. 
(CLEAR OOUN THE RX VECTOR. 

MOV 
TRAP 

{INDICATE THAT UE ARE NOT UITHIN A TEST. 



«PRI07.R0 
C«SPRI 



RXVECA. RO 
C»CVEC 



TRAP C»EXIT 
.WORD L10043-. 

i LOCAL STORAGE FOR LINE NUMBER USED IN THE TEST. 



L 10043: 



TRAP 



C«ETST 



7080 
7061 
7082 
7083 
7084 
7085 
7086 
7087 
7088 
7089 
7090 
7091 
7092 
7093 
7094 
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M14 
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SEQ 181 



SBTTL HARDWARE TEST 



- TXACTF - 
• TX ACTION FIFO TEST 



THIS TEST VERIFIES THAT THE OUT'S TX-ACTION FIFO CAN CORRECTLY 
HOLD 16 TX -ACTIONS. ONE CHARACTER IS TRANSMUTED ON EACH LINE 
USING DMA, THE TX -ACTIONS ARE THTN READ FROM THE FIFO, VERIFING 
THAT THEY ARb IN THE CORRECT ORDER AND THAT THERE ARE 16 OF THEM. 
THE TEST ALSO VERIFIES THAT THE OUT WILL NOT SEND TX-INTS AFTER 
THE TX.ACTION FIFO HAS BEEN EMPTIED. 

THIS TEST IS PERFORMED IN INTERNAL LOOPBACK ON ALL LINCS. 



7095 



031152 
031152 



7096 


031152 








031152 


012700 


000240 




031156 


104441 




7097 








7098 




000017 




7099 


031160 


012767 


000017 


7100 


031166 


012767 


177777 


7101 


031174 


012767 


000001 


7102 


031202 


012767 


013415 


7103 


031210 


012767 


007346 


7104 


031216 


012767 


012170 


7105 








7106 








7107 








7108 








7109 








7110 








7111 


031224 


004767 


162766 


71 1 O 




1 ATA AO 




7113 


031232 


000167 


000474 


7114 








7115 








7116 








7117 








7118 








7119 


031236 


012705 


177777 


7120 


031242 


012700 


000204 


7121 








7122 


031246 


004767 


166300 


7123 


031252 


012700 


177670 


7124 


031256 


004767 


166320 


7125 


031262 


012704 


000012 


7126 


031266 


004767 


162770 


7127 








7128 








7129 








7130 








7131 


031272 


005001 




7132 


031274 


012702 


002650 


7133 


031300 


012703 


000001 



151066 
151054 
152646 
152642 
152636 
152632 



BGNTST 



SETPRI «PRI05 



TNUH TNUM ♦ 1 

MOV ♦TNUM.TSTNUM 

WOV ♦-1.CTRLCF 

MOV ♦l.ERRTYP 

MOV •S901..ERRNBR 

MOV «EM5901.ERRMSG 

MOV «ERS901.ERRBLK 



T15: 



i ALLOW LTC INTERRUPTS. 



MOV 
TRAP 



♦PRI05.ro 
C$SPRI 



(INCREMENT ASSEMBLY TIME TEST COUNTER 

I SET UP THE TEST NUMBER. 

{INDICATE THAT WE ARE IN A TEST. 

iSET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET THE ERROR tJUMBER TO 5901. 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

iSET THE ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE ANY STATUS COOES IN THE FIFO. 
CLEAR THE RX AND TX ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >»>> 5901 <«<<. 



JSR 
BCS 
JMP 



PC.CLNRST 

.*6 

601 



I RESET THE OHU-11 REPORT ANY ERRORS FOUND. 
tSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
(EXIT THE TEST IF FATAL ERROR FOUND. 



i ♦ 



SET INTERNAL LOOPBACK ON ALL LINES KHO ENABLE RECIEVERS. SET UP T.HE 
LPR'S TO S8.4K BAUD. 8 BITS/CHARA. ODD PARITY. 2 STOP BITS. 

MOV ♦MAPLNS.R5 j INDICATE TO SET UP ALL LINES. 

MOV «2O4.R0 I PASS PARAMETER FOR INTERNAL LOOPBACK. 

t ENABLE RECIEVERS. 

JSR PC.WTWLNC I INITIALISE T« LINE CONTROL REGS. 

MOV ♦177670. RO iPASS THE LPR CONTENTS. 

JSR PC.WTWLPR }SET THE LPR'S TO 38. 4K BAUD. 

MOV «10..R4 {PASS DELAY TIME OF 10 MILLI SECS. 

JSR PC. DELAY J WAIT FOR LNCTRL AND LPR REGS TO BE U»>DATEO. 



t ♦ 

> 

t - 



INITIATE A DMA ON EACH LINE AND WAIT FOR ALL DMA'S TO COMPLEATE. 

CLR Rl iPASS THE FIRST LINE NUMBER. 

MOV «6Ur6AS.R2 iPASS THE START OF THE DATA PATTERN TO TX. 

MOV «1.R3 (PASS THE LENGTH OF THE DATA PATTERN. 



Ni4 
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SEO 16^ 



7134 
7135 
71S6 
7137 
713a 
7139 
7140 
7141 
7142 
7143 
7144 
7145 
7146 
7147 
7148 
7149 
7150 
7151 
7152 
7153 
7154 
7155 
7156 
7157 
7158 
7159 
7160 
7161 

7162 
7163 
7164 
7165 
7166 
7167 
7168 
7169 
7170 
7171 
7172 
7173 
7174 
7175 
7176 
7177 
7178 
7179 
7180 
7181 
7182 
7183 
7184 
7185 
7186 
7187 
7188 
7189 



031304 
031310 
031314 
031320 
031322 



031326 
031332 
031334 
031340 



031342 
031346 

031352 
031354 
031360 
031362 
031364 
031370 

031372 
031374 
031374 
031376 
031404 
031406 
031410 
031414 



031416 
031422 

031424 
031432 
031436 
031442 

031444 
031446 
031452 



031454 
031460 



012704 
005267 
004767 
103402 
000167 



004767 
005201 
022701 
001365 



005267 
012703 

005001 
017702 
100150 
000302 
042702 
020201 

001405 

104460 

032767 
001552 
005201 
022701 
001357 



005777 
100024 

012767 
012702 
005777 
100123 

005202 
022702 
001371 



005267 
012701 



000005 
152536 
163060 

C00400 



162730 
000020 



152504 
007402 



150646 
177760 

000100 
000020 



2(: 



MOV 
INC 
JSR 
BCS 
JMP 



«5.R4 

ERRNBR 

PC.OOOMA 

.*6 

50$ 



I PASS THE DELAY TIME OF 5 MILLI SECS. 
tSET THE ERROR NUMBER TO 5902. 
(TRANSMIT THE DATA PATTERN. 
(CONTINUE IF SUCCESSFUL. 

(ABORT THE TEST IF ERROR FOUND DURING DMA 



TX, 



; ♦ 



WAIT FOR THE DMA TO COMPLEATE BEFORE INITIATING ANOTHER. 



JSR 
INC 
CMP 

BNE 



PC. DELAY 
Rl 

n6. .Rl 
2i 



41: 



150604 



( READ THE TX -ACTIONS FROM THE 
i IN THE CORRECT ORDER. 

INC ERRNBR 

MOV «EM5902.R3 

CLR Rl 

MOV 8CSRA.R2 

BPL 14 « 

SUAB R2 

BIC M77760.R2 

CMP R2.R1 

BEQ 6« 
ERROR 

BIT «6IT06. OPTION 

BEQ 60$ 

INC Rl 

CMP n6. .Rl 

BNE 4$ 



6$: 



(WAIT 5 MILLI SECS FOR THE DMA TO COMPLEATE. 
(INCREMENT THE LINE NUMBER. 
(BRANCH TO INITIATE ANOTHER DMA IF 
(NOT ALL LINES SERVED. 

TX.ACTION FIFO AND VERIFY THAT THEY OCCURED 



(SET THE ERROR NUMBER TO 5903. 
(SET THE ERROR MESSAGE TO. 

( "TX-ACTION RECIEVED FROM THE WRONG LINE". 
(CLEAR THE LINE NUMBER. 
(READ THE CSR. 

(BRANCH TO REPORT ERROR >>5904<<. IF NO TX ACT. 
(PUT THE TX LINE NUMBER IN THE LOW BYTE. 
(CLEAR THE CLUTTER FROM THE LINE NUMBER. 
(COMPARE THE ACTUAL LINE NUMBER OF THE 
(TX-ACTION WITH THE EXPECTED NUMBER. 
(SKIP THE ERROR REPORT IF CORRECT. 
(REPORT THE ERROR >>>>> 5903 <<<<<. 

TRAP C*ERR0R 
(EXIT IF EXTENDED ERROR REPORTING HAS NOT 
(BEEN REQUESTED. 

(INCREMENT THE EXPECTED LINE NUMBER. 
(BRANCH AND READ ANOTHER TX-ACTION IF, 
(NOT ALL LINES HAVE BEEN SERVICED. 



I 16 TX-ACTIONS HAVE BEEN READ. THE TX-ACTION BIT SHOULD NOW BE CLEAR. 
I CHECK THAT IT IS CLEAR. IF IT ISN'T THEN COUNT THE NUMBER OF EXTRA 
t TX-ACTIONS RECIEVED AND REPORT THE ERROR. 



150604 



013421 
000021 
150564 



000145 



152372 
007570 



152420 



8*: 



TST 8CSRA 

BPL 10$ 

MOV #5905. .ERRNBR 

MOV nT. .R2 

TST 8CSRA 

BPL 16$ 

INC R2 

CMP n01..R2 

BNE 8$ 



(READ THE CSR. 

(BRANCH IF THE TX-ACTION BIT IS CLEAR. TO 

(TEST THE TX- INTERRUPTS. 

(SET THE ERROR NUMBER TO 5905. 

(SET R2 TO BE THE NUMBER OF TX ACTIONS FOUND. 

(READ THE CSR. 

(BRANCH AND REPORT ERROR IF THE TX-ACTION FIFO. 
(FINALLY CLEARED. 

(INCREMENT THE NUMBER OF TX-ACTIONS FOUND. 
I IF LESS THAN 100 TX-ACTIONS HAVE BEEN READ. 
(THEN CONTINUE READING THE CSR. 
(OTHERWISE REPORT THE ERROR. 



REPORT THE ERROR "TX-ACTION FIFO WOULD NOT EMPTY- 
ING ERRNBR I SET THE ERROR NUMBER TO 5906. 
MOV «EH5904.R1 (SET THE ERROR MESSAGE TO. 



c/OMveo OHi* 11 

— - ffST 











0Si4«4 


012767 




0S1472 


000515 


7m 




























ri^ 


0SI4 74 


005001 


7 m 






720C 






7^01 






7202 






7205 


0514 76 


012767 


7204 


051504 


012702 


7205 


051510 


012705 


7206 


051514 


004767 


7207 


051520 


105102 


7206 


051522 


005201 


7209 


051524 


022701 


7210 


051550 


001571 


7211 


051552 


012704 


7212 


051556 


004767 


7215 






7214 






7215 






7216 






7217 






7^10 


051542 


005067 


7219 


051546 


005067 


7220 






7221 


051552 





0S1»2 
0S15S6 
0S1M2 
OS 1566 
0S1572 
051574 

7222 051600 
051600 
051604 

7225 051606 

7224 

7225 

7226 

7227 

722S 

7229 

7250 

7251 

7252 



051612 
051616 



7255 
7?54 



051622 
051622 
OS 1626 
051650 
051654 
051654 
051640 



012746 
012746 
016746 
012746 
104457 
062706 

012700 
104441 
004767 



012704 
004767 



012700 
104441 
004767 

016700 
1044 56 



PM*r2 MACDO m200 

rxAcrr 



011762 152S64 
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SCO 16 S 



nov •CftOSOS.ERRBLK 
IR 1«« 



t -TX-ACTION riFO UOULO NOT £f»TT" 
iSET UP THE EfmOP ItEPORTINC ROUTINE. 
tCO REPORT T»C ERROR. 



I NOM VERIFT T»«»T NO TX.INTS OCCUR AFTER T»€ TX.ACTION riFO HAS BEEN Ef^TIED. 
I or TXJICTIONS. I.E. NO INTERRUPTS OCCUR WITH T»€ TX.ACTION BIT CLEAR. 



10«: 



CLR 



Rl 



iPASS Tie NUMBER OT T»€ FIRST CINE 



015425 152346 
0C265O 
000001 
162660 



000020 

000144 

162520 



i50524 
150522 



000500 
017754 
150450 
000005 

000010 

000200 

165444 



000005 
162440 



000540 
165562 
150556 



I 'initiate 

I • 

NOV 
NOV 
NOV 
12* : JSR 

BCC 
INC 
CMP 

BNE 
NOV 

JSR 



A ONA ON ALL LINES AND UAIT FOR ALL ONA'S TO COMPLETE. 



#5907, fERRNBi^ 

«6UrBAS.R2 

•1.R5 

PC.DOOMA 

50» 

Rl 

•16.. Rl 
12« 

•100.. R4 

PC. DELAY 



Tx. 



I SET T»C ERROR NUMRER TO 5907. 
tPASS THE START V THE OMA PATTERN TO 
I PASS THE LENGTH OF THE DATA PATTERN. 
I TRANSMIT THE CATA PATTERNS. 
I ABORT THE TEST IF ERROR FOUND DURING DMA TX. 
{INCREMENT THE LI>C NUMBER. 
iBRANCH TO INITIATE ANOTHER DMA IF. 
I ALL LINES NOT SERVED. 
I SET THE DELAY OF 100 MILL I SECS. 
lUAIT FOR THE OHA' S TO COMPLETE. 



I SET UP THE INTERRUPT SERVICE ROUTINE THAT UILL READ THE TX.ACTION FJFQ 
I UNTIL EMPTY AM) CHECK FOR ANY SUBSEQUENT INTERRUPTS UITH NO TX.ACTION. 
I ENABLE TX INTERRUPTS. 
I • 



CLR 
CLR 



TXINTC 
TXINTF 



t CLEAR THE TX INT COUNTER. 
I CLEAR THE TX INT FLAGS. 



&ETVEC TXVECA.^TXAINT.«PRI06 



SETPRI «PflI04 



JSR 



PC.TXIEI 



tALLOU DEVICE INTERRUPTS. 



t ENABLE TX INTERRUPTS. 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

MOV 
TRAP 



•PRI06. (SP) 
•TXAINT, (SP) 
TXVECA. (SP^ 
•5.(SP) 
CtSVEC 
•10. SP 

•PRI04,R0 
CtSPRI 



I ♦ 
I 



UAIT FOR THE INTERRUPTS TO OCCUR 



MOV 

JSR 



•5.R4 

PC. DELAY 



I SET THE DELAY FOR S MILL I SECS. 
iDELAY FOR 5 MS. 



I ♦ 

I 

i 



DISABLE INTERRUPTS AND CLEAR DOWN THE INTERRUPT SERVICE ROUTINE. 



SETPRI •PR 10 7 



JSR PC.TXIEO 
CLRVEC TXVECA 



iDISABLE ALL INTERRUPTS. 



iDISABLE OUT Tx INTERRUPTS 
iCLEAR THE TX INT VECTOR 



MOV 
TRAP 



MOV 
TRAP 



•PRI07,R0 
CISPRI 



TXVECA.RO 
CICVEC 
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Sfa 184 



7255 








7236 








7257 








725« 








7254 


051642 


005267 


152204 


7240 


051646 


005767 


150420 


7241 


051652 


001425 




7242 


031654 


005267 


152172 


7245 


051660 


005767 


150410 


^244 


051664 


100022 




7245 








7246 


051666 


01?701 


007654 


7247 








7246 








7249 


051672 


012767 


011762 


7250 


051700 


000410 




7251 








7252 








7255 








7254 








7255 


051702 


010102 




7256 








7257 


031704 


012767 


015420 


7256 


051712 


012701 


000020 


7259 


051716 


012705 


007476 


7260 








7261 


051722 
051722 


104460 




7262 


051724 


000402 




7265 








7264 


051726 


004767 


164740 


7265 


051752 


005067 


150512 


7266 








7267 


051736 
031756 
051756 


104401 





t • 



VERIFT THAT A Tx INTERRUPT OCCUREO. AND IHAT NO TX INTERRUPT OCOJRED lACN 
t THE TX. ACT ION FIFO UAS EMPTY. 



152156 



INC 
TST 

BEO 
INC 
TST 

BPL 

HOV 



NOV 
BR 



TXINTC 
50» 

TXINTF 
60» 

4EH5905 



•ER0S05 



.Rl 

.ERRBLK 



Terror reporting. 

I - 



152140 



14»: 

16 <: 
18*: 



50<: 
60*: 



MOV 

MOV 
MOV 
MOV 

ERROR 

BR 

JSR 
CLR 

ENOTST 



RI.R2 

•5904. .ERR««R 
•16.. Rl 
4CM5905.R3 



60* 

PC.TSABRT 
CTRLCF 



ScT THE ERROR NUMBER TO 5906. 
READ THE INTERRUPT COUNT. 
BRANCH TO REPORT ERROR IF NO INTS OCCURED. 
SET THE ERROR NUMBER TO 5909. 
READ THE TX INTERRUPT FLAGS. 
EXIT WITH SUCCESS IF NO INTERRUPT OCCURED 
UITMOUT A CORRESPONDING TX.ACTION. 
SET UP THE ERROR MESSAGE. 
"TX INT OCCURED AFTER TX FIFO HAD 
BEEN ErFTIED". 
SET THE ERROR ROUTINE IN THE ERROR TABLE. 
GO AND REPORT THE ERROR. 



I PASS THE ACTUAL NUMBER OF TX -ACTIONS RECIEVEO. 

I TO THE ERROP ROUTINE. 

(SET THE ER*^ )R NUMBER TO 5904. 

iPASS THE EXECUTED NUMBER OF TX-ACTIONS. 

tSET THE ERROR MESSAGE TO. 

I "INCORRECT NUMBER OF TX -ACTIONS FOUND". 

(REPORT THE ERROR. 

TRAP CIERROR 

lEXIT THE TEST. 

{REPORT NON-RELATED TEST ERROR. 
{INDICATE THAT UE ARE NOT WITHIN A TEST. 



L 10044: 



TRAP 



C*ETST 
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18S 



7269 
7270 
7271 
7272 
7275 
7274 
7275 
-•276 
7277 
7275 
7279 
7280 
7281 
7282 

7283 
7284 



7285 
7266 
7287 
7288 
7289 
7290 
7291 
7292 
7295 
7294 
7295 
7296 
7297 
7298 
7299 
7500 
7501 
7502 
7505 
7504 
7505 
7506 
7507 
7508 
7509 
7510 
7511 
7512 
7515 
7514 
7515 
7516 
7517 
7518 
7519 
7520 
7521 
7522 



051740 
051740 

031740 
051740 
051744 

051746 
051754 
051762 
051770 
051776 
052004 
052010 
052014 
052020 



052024 
052050 
052052 



052056 
052042 
052046 
052052 

052056 
052062 
052066 
052072 
052076 



.SBTTL HARDUARE TEST 



TXFIPO - 



- TXFIFO TEST - 

THIS TEST IS USED TO VERIFY THAT THE OUT'S TRANSMIT FIFOS CAN MOLD 
64 CHARACTERS AND THAT OKLY ONE TX INTERRUPT OCCURS FOR ALL 64 
CHARACTERS. THE TEST ALSO EXERSISES T»-£ BYTE SWAPPER BY USING 
ALTERNATE WORD AND BYTE WRITES TO THE TX FIFO. AS WELL AS CHECKING THAT 
THE FIFOSIZE REGISTER REPORTS THE NUMBER OF CHARACTERS IN THE FIFO 
CORRECTLY. ANY BMP CODES FOUND ARE SAVED ON THE QUE TO BE REPORTED 
LATER. 

THE TEST IS PERFORMED IN INTERNAL LOOPBACK ON ALL ACTIVE LINES. 



012700 
104441 

000020 
012767 
012767 
012767 
012767 
012767 
005067 
005067 
012700 
004767 



000240 



000020 
177777 
000001 
015561 
007754 
150602 
150256 
002614 
162214 



150500 
150266 
152060 
152054 
152050 



BGNTST 



SETPRI «Pni05 



TNUM TNUM ♦ 1 

MOV •TNUM.TSTNUM 

MOV •-1.CTRLCF 

MOV tl.ERRTYP 

MOV •6001..ERRNBR 

MOV «EM6001.ERRMSG 

CLR ERSMRF 

CLR EXOERR 

MOV 4ERCNTB.R0 

JSR PC.CLR16U 



T16: 



lALLOU LTC INTERRUPTS. 



MOV •PRI05.R0 
TRAP CtSPRI 
(INCREMENT ASSEMBLY TIME TEST COUNTEFt 
tSET UP THE TEST NUMBER. 
(INDICATE THAT WE ARE IN A TEST. 
tbET ERROR TYPE AS FATAL IN ERROR TABLE. 
tSET THE ERROR NUMBER TO 6001. 
I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
I CLEAR THE ERROR SUMMARY FLAT.S. 
(CLEAR THE "EXIT ON ERROR" FLAG. 
(SET UP THE START ADDRESS FOR THE BLOCK. 
I CLEAR THE BLOCK OF 16 HORDS. 



004767 162166 
10^402 

000167 000722 



I RESET THE DUT TO A KNOWN STATE. REMOVE ANY STATUS CODES IN THE FIFO. 
( CLEAR THE RX AND TX ENABLE BITS IN THE CSR. 
t THIS SUBROUTINE REPORTS ERROR >>>>> 6001 <<<<<. 
t - 



JSR 
BCS 
JMP 



PC.CLNRST 
.♦6 
62« 



(RESET THE DHU-11 REPORT ANY ERRORS FOUND. 
(SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
(EXIT THE TEST IF FATAL ERROR FOUND. 



012705 
004767 
016705 
012700 

004767 
012700 
004767 
012704 
004767 



177777 
164760 
150146 
000204 

165470 

177670 
165510 
000012 
162160 



SET INTERNAL LOOPBACK ON ALL ACTIVE LINES AND ENABLE RECIEVERS. SET UP THE 
LPR'S TO 58. 4K BAUD. 8 BITS/CHARA. ODD PARITY. 2 STOP BITS. DISABLE 
TRANSMITTERS ON ALL LINES. 

MOV •nAPLNS.R5 (INDICATE TO DISABLE ALL LINES. 

JSR PC.TXDSBL (DISABLE TX ON ALL LINES. 

MOV ACTLNS.R5 (INDICATE TO SET UP ACTIVE LINES ONLY. 

MOV •204.ro (PASS PARAMETER FOR INTERNAL LOOPBACK. 

(ENABLE RECIEVERS 

JSR PC.WTWLNC (INITIALISE THE LINE CONTROL REGS. 

MOV #1 77670.ro (PASS THE LPR CONTENTS. 

JSR PC.WTWLPR (SET THE LPR'S TO 38. 4K BAUD. 

MOV «10..R4 (PASS DELAY TIME OF 10 MILLI SECS. 

JSR PC, DELAY (WAIT FOR LNCTRL AND LPR REGS TO 6E UPDATED. 

TsET UP THE TX INTERRUPT SERVICE ROUTINE AND VECTOR. THE ROUTINE CO^TS 
i THC NUMBER OF INTERRUPTS AND CHECKS FOR ANY INTERRUPTS OCCUR INC WITH 
t NO TX ACTION. 
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SEQ IH^j 



7523 


032102 








A to 1 AO 

03<f 102 




AAAYAA 




AS01 


At 07^41. 

012 /40 


At 77XA 

Ul f f OH 




032112 


At ^7A^ 


t i^Af AA 




0321I6 


A1 0 7A^ 
012 'HO 


AAAAAV 






% f\AAX7 
lUhhO f 








Aik.D7Ai^ 


AAAA1 A 




AXD1 <A 


AAA 7^7 


1 1 DO 
ID^Kc 


















f 5c f 
















7XOQ 
















7 W1 


AVD1 XA 


A 1 4; 7A^ 


1 ^AAI%A 




A01 AA 






7 W Y 
















7XXK 








7YXJ; 
f OdO 








7Xt7 




1 1 A1 77 
X XS*X f f 


1 ^AA^9 


f 




A1 A1 t\X 




7XYQ 








7TAA 








7XA1 








f O^ii 








IXAX 








f o^ 


AY01 AA 


A1 07f%r 


AAAOAY 
JMUSISJO 


7XAK 
f OHO 




Af AX77 


IDVIU^^ 


7XASi 
f OHO 


AYDI 7A 


1 A<^DAV 
XsJOcUo 




f OH f 


AYOl 70 


1 1AX77 




f OHC 


f\XO\ 7A 


UOc rSJO 


AAAAA1 


f OH^ 








7X^A 
' OOs/ 




AA1 VA.7 




' oot 




AA^AAD 




' ODc 




1 1 7 7AD 
11 / fQd 


IDUVcU 


r OOO 




Icc r Uc 


AAAA4L.7 


f OjH 




AA1 




f O^^ 








f OJ^ 








7^S7 








7^^ 




A1 ni AA 




f OO7 




A 1 0 7 A 1 


AAAAJ^7 


7^IAA 
f OOV 




A1 fiXAH^ 




7361 


032232 


012767 


013562 


f o^>c 


A^P9AA 


A1 07AX 


A1 AAAA 


75A? 












A1 P7A7 


A1 D^7#^ 




MO^^O^ 


1 AAAAA 




f 




A1 PAA*^ 




7^7 

' 0^ f 




A1 AAAI 




7366 


032260 


032767 


000100 

www * WW 


7369 


032266 


001002 




7370 


032270 


000167 


000444 


7371 








7372 









SETVEC TXVECA.«TXAINT.«PRI06 

MOV 

MOV 

MOV 

MOV 

TRAP 

AOD 

JSP PC.TXIEI I SET THE TX INT ENA'iLE BIT IN THE CSR, 



♦PPI06. (SP) 

♦TXAINT, -(SP) 

TXVECA.-(SP) 

♦3.-(5P) 

CISVEC 

«10.SP 



URITE 64 CHARACTERS TO ALL TXFxFO'S USING ALTERNATE UORD/BYTE URITES 
TO EXERSISE THE BYTE SWAPPER. AFTER THE FIRST 9 CHARACTERS HAVE BEEN 
WRITTEN CHECK THAT THE FIFQSIZE REGISTER SHOWS THE CORRECT NUMBER OF 
FREE BYTES IN THE FIFO. 



MOV 
CLR 



ACTLNS.RS 
Rl 



21: 



CLC 

ROR R5 

BCC lot 

MOVB Rl.SCSRA 

MOV R1.R3 

SWAB R3 



jSET UP THE ACTIVE LINE BIT MAP. 
I SET UP THE FIRST LINE NUMBER. 

iCLEAR THE CARRY BIT READY FOR THE ROTATION. 
iROTATE THE ACTIVE LINE BIT MAP INTO THE CARRY. 
I AVOID TESTING THIS LINE IF ITS INACTIVE. 
iLOAO THE LINE NUMBER OF THE UUT INTO THE CSR. 
{INITIALISE THE DATA PATTERN FOR THIS LINE Br, 
{PUTTING THE LINE NUMBER IN THE HIBYTE AND 
{CLEARING THE LOBYTE. 



J LOAD 9 CHARACTERS INTO THE TXFIFO AND CHECK THE FIFQSIZE REGISTER. 



I - 
4$i 



151612 



151604 



147722 



MOV *3.R0 {LOOP COUNT. 

MOV R3.8FDATA {MOVE A WORD OF DAT/* INTO THE FIFO. 

INCB R5 {INCREMENT THE LOBYTE OF THE DATA PATTERN. 

MOVB R3.8FDATA {MOVE A BYTE OF DATA INTO THE FIFO. 

ADO IM01.R3 {INCREMENT THE HIGH AND LOW BYTE OF THE DATA. 

DEC RO tOF.CREMENT THE LOOP COUNT. 

BNE 4$ {BRANCH IF NOT ALL 9 CHARACTERS WRITTEN. 

CLR 92 {CLEAR THE UPPER AND LOWER BYTE OF R2. 

MOVB SFSLSA.Pa {READ THE FIFQSIZE REGISTER. 

CMPB ♦55., R2 {COMPARE THE EXPECTED SIZE WITH THE ACTUAL. 

BEQ 6* {AVOID THE ERROR REPORT IF THE SIZE IS CORRECT. 

REPORT THE ERROR, INCORRECT VALUE. >>>>> 6002 <<<<<. 

{PASS THE LINE NUMBER TO THE ERROR ROUTINE. 
{PASS THE EXPECTED FIFO SIZE. 
{SAVE THE DATA PATTERN. 
{SET THE ERROR NUMBER TO 6002. 
(PASS THE MESSAGE. 

{ "INCORRECT VALUE IN FIFQSIZE REGISTER". 
{SET THE ERROR REPORTING ROUTINE. 

TRAP CIERROR 

(RESTORE THE PATTERN. 
{RESTORE THE LINE NUMBER. 

HAS EXTENDED ERROR REPORTING BEEN REQUESTED > 



MOV 


R1.R4 


MOV 


•55. .Rl 


MOV 


R3.-(SP) 


MOV 


46002. .ERRNBR 


MOV 


•EM6002.R3 


MOV 


•ER6001.ERRBLK 


ERROR 




MOV 


(SP)».P3 


MOV 


R4.RI 


BIT 


•6IT06.0PTIQN 


BNE 


61 


JMP 


60t 



(continue 

{EXIT THE 



IF IT HAS. 
TEST IF IT 



HASN* T . 



( • 



CONTINUE FILLING UP THE HFC UNTIL 64 CHARACTERS HAVE BEEN LOADED. 
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SEO 167 



TXT* 








"7 A 

f o m 


A 7A 


A1 ^7AA 


AAAA^O 


fOfj 




A1 AT77 


1 il77TA 


f ^ ff> 


03c ov4 






f O ' f 


A V^SA& 


1 1 AH77 


X^ » • 


7 






AAA4A1 


1 ^ 




AA<R1LAA 




7 VAA 




AAi 










1 A77AJI 










7 VAS 




















AA^7A<\ 








AA1 AAP 




7*A 7 




AA^OAI 






A»^««il 


AAA7AP 




7XAQ 








7VOO 








71K01 








7XQ^ 

f 








7XQY 








7XOA 












A1 A7A^ 




r 




AA^kAAl 




7X07 








7XOA 


AT^XJLA 


AAADA1 






U3c J^O 


AA^LAA*^ 








1 ATI ^7 








1 1 A1 77 

IXUX 9 f 


147A^A 
X^ rO^U 






A1 A1 AT 








AAA TAT 




7Af%A 




A1 07iL7 
UX^ f O r 


A1 T<U^T 






AAA7#^7 


14^9774 


f *tVIO 




1 ATI ^1 
xUOxDx 




7 Aft 7 




AA^A^7 


1 A7A7A 
X^ r O » w 


• ^ vo 




AA*(Atf^7 


1 474«AA 
1^ rOOO 










7A1 O 










VOc^ X^ 


A1 07AA 
VX^ r v/v 














VOC^4£^ 


A1 07AA 


AAA 1 44 


7A1 D 




f O 9 


1 ^lilTA 
xOxO^V 




AX04 XP 










A1 07AA 
UXc 9%AJ 


AAA^AA 










7A1 A 




A40777 


1 AAAAA 


7A1 ^ 








7A1 A 








741 7 








741 A 








74 1Q 






1 ^14AA 
x^x^w 


74 PO 






147#^14 

X^ f OX"* 


7421 


032456 


001520 




7422 


032460 


005267 


151366 


7425 


032464 


005767 


147604 


7424 


032470 


100513 




7425 


032472 


022767 


000001 



6»: MOV •18.,R0 iS£T UP THE OUTER LOOP. 

6<: MOV RS.aFQATA iMOVE A WORD OF DATA INTO THE riFQ. 

INCB R3 I INCREMENT THE LOBYTE OF THE DATA PATTERN. 

MOVB R3.aFDATA iMOVE A BYTE OF DATA INTO THE FIFO. 

ADO #401. R3 .INCREMENT THE HIGH AND LOU BYTE OF THE DATA. 

DEC RO I DECREMENT THE LOOP COUNT. 

BNE 8t {BRANCH IF NOT ALL 54 CHARACTERS WRITTEN. 

MOVB R3.SFDATA iLOAO THE LAST CHARACTER. 

tVoOP UNTIL THE TXFIFO' S ON ALL ACTIVE LINES HAVE BEEN FILLED. 

io»: TST R5 I HAVE ALL FIFOS BEEN FILLED. 

BEQ 12 » I YES. THEN GO AND TRANSMIT THE CHARACTERS. 

INC Rl lOTHERWISE SELECT THE HEUJ LINE, 

BR 2« I AND BRANCH TO TEST IF ITS ACTIVE. 

ENABLE TRANSMISSION ON EACH LINE IN TURN AND WAIT FOR 100 MS TO ALLOW 
ANY INTERRUPTS TO OCCUR BEFORE DISABLING TRANSMISSION. VERIF* THAT ONLY 
INTERRUPT OCCUREO AND CHECK THAT THE CHARACTERS WERE TRANSMITTED UNCORUPTEO 
AND ON THE CORRECT LINE. 

I - 

12»: 



14$: 



151462 



147626 



147574 



MOV ACTLNS.R5 

CLR Rl 

CLC 

ROR R5 

BCC 24$ 

M0V8 R1.8CSRA 

MOV R1.R3 

SUA8 R3 

MOV •6003..ERRNBR 

JSR PC.PUFIFO 

BCC SOI 

CLR TXINTC 

CLR TXINTF 

BIS «BIT15.0TXAD2A 

SETPRI •PRI04 



MOV •lOO. ,R4 
JSR PC. DELAY 
SETPRI tPRIOS 



SIC •eiT15.STXA02A 



J SET UP THE ACTIVE LINE BIT MAP. 
;SET UP THE FIRST LINE NUMBER. 

(CLEAR THE CARRY BIT READY FOR THE ROTATION. 
iROTATE THE ACTIVE LINE BIT MAP INTO THE CARRY. 
I AVOID TESTING THIS LINE IF ITS INACTIVE. 
tLOAD THE LINE NUMBER OF THE UUT INFO THE CSR. 
I INITIALISE THE "EXPECTED" DATA PATTERN FOR 
{THIS LINE. 

tSET THE ERROR NUMBER TO 6003. 
I PURGE THE RXFIFO. 

iREPORT THE ERROR IF THE FIFO WOULD NCT PURGE. 
(CLEAR THE INTERRUPT COUNT. 
(CLEAR THE INTERRUPT FLAGS. 
(ENABLE TRANSMISSION ON THIS LINE. 
(ALLOW DEVICE INTERRUPTS. 

MOV «PRI04.R0 
TRAP C$SPRI 

(SET THE DELAY. 

(DELAY FOR 100 MILL I SECS. 

MOV 4PRI05.ro 
TRAP CISPRI 
(DISABLE TRANSMISSION ON THIS LINE. 



147572 



{ VERIFY THAT ONLY ONE INTERRUPT OCCURED AND THAT IT WAS ACCOMPANIED St 
{ A CORRESPONDING TX -ACTION. 

** INC ERRNBR (SET THE ERROR NUMBER TO 6004. 

TST TXINTC (MAS M INTERRUPT OCCURED ? 

BEQ 50$ (REPORT THE ERPOR IF NO INTERRUPT OCCURED. 

INC ERRNBR iSET THE ERROR NUMBER TO 6005. 

TST TXINTF (HAS AN INTERRUPT OCCURED WITHOUT A TX-ACTION ? 

BMI 50$ (REPORT THE ERROR IF IT HAS. 

CMP Ol. TXINTC jDIO ONLY ONE INT OCCUR ? 
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SEO 186 



7 A 

{ •icO 




f\f\ 1 4 P4 












t o 






















1 4 7S64 






ni ni A4 




» *ti7c 






OOOOOl 

www A 




n3Psi4 

J A** 






7A^ 






010040 

V A W^V 


7435 








7A^ 








74^7 






151324 

A ^ A 'JC** 


74 






012276 

V ACC • V 






104460 




• "f ^ V 




012603 












744P 




032767 


OOOlOO 

WV AW 


7443 




001473 












744^ 
















7447 








7448 








7449 








74SO 








74S1 






013567 


74^ 








74SX 






000025 


74 54 




w Ac ' VC 


000003 

WWw ■«■# 


745S 


05P57P 




163140 

AO«# A^W 


7456 








7457 








745A 




AV JVCC 




7459 




OAS 76 7 


147446 

A^ f^^O 


7460 




Ml OSS 




7461 








746P 




OOSPOO 




7463 








7464 


03P612 


00O3O3 




7465 


032614 


005302 

W«/ WVC 




7466 


032616 


OOi36S 




7467 








7468 


032620 


000303 




7469 


03262^ 


005304 




7470 


032624 


001360 




7471 








7472 


032626 


004767 


163104 


7473 


032632 


103004 




7474 


032634 


005767 


147412 

A~ ■ ~ AC 


7475 


032640 


001037 




7476 


032642 


000422 




7477 








7478 








7479 








7480 


032644 


012767 


013571 


7481 


032652 


012703 


010243 



BEQ 



16* 



lAVOIO THE ERROR IF ONLY ONE INTERRUPT. 



REPORT THE ERROR. MORE THAN ONE INTERRUPT. >>>>> 6006 <<<<< 



151322 



147440 



NOV TXINTC.R2 

MOV R1.R4 

MOV •l.Rl 

MOV R3.-(SP) 

MOV «EM6003,R3 



INC ERRNBR 

MOV «ER6001.ERRBLK 
ERROR 

MOV (SP)*.fl3 

MOV R4.R1 

BIT «BIT06. OPTION 

BEQ 60 » 



,PASS THE ACTUAL NUMBER OF INTERRUPTS. 

I PASS THE LINE NUMBER. 

I PASS THE EXPECTED NUMBER OF INTS. 

I SAVE THE DATA PATTERN. 

iPASS THE MESSAGE. 

J "MORE "^HAN ONE TX-INT OCCURED FROM A FULL 
J TX FIFO". 

I SET THE ERROR NUMBEF TO 6006. 
tSET UP THE ERROR BLOCK. 

TRAP OERROR 

tRESTORE THE DATA PATTERN. 
iRESTORE THE LINE NUMBER. 

iHMS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
J EXIT THE TEST IF IT HAS. 



t READ THE CHARACTERS FROM THE RXF XFO AND VERIFY THEY ARE CORRECT AND MERE 
t RECIEVED ON THF. CORRECT LINE. 

t THIS SUBROUTINE REPORTS ERRORS. >>>>> 6007 THRU 6006 <<<<<. 
151272 16(: 



161: 
20$: 



NOV 
CLR 
MOV 
MOV 
JSR 



«6007..ERRI«R 
RO 
•21. .R4 
*3.R2 
PC.REPOER 



a SET UP THE ERROR NUMBER TO 6007. 
(INITIALISE THE NUMBER OF CHARS READ COUNT. 
I SET UP THE OUTER LOOP COUNT. 
I SET UP THE IhMER LOOP COUNT. 

iREAO A CHARACTER FROM THE RXFIFO. VERIFY THAT 
tIT IS CORRECT AND CAME FROM THE UUT. REPORT 
tANY ERRORS. >>>» 6007 THRU ,X>08 <<<<<. 
tBRMCH TO REPORT THE ERROR IF THE FIFO EMPTY. 
J TEST THE "EXIT ON ERROR" FLAG. 
lEXIT THE TEST IF SET. I.E. AN ERROR OCCURED. 
tANO NO EXTENDED ERROR REPORTING WAS REQUESTED. 
I INCREMENT THE READ CHAR COUNT. 
{INCREMENT THE LOBYTE OF THE DATA PATTERN. 
iSUAP BYTES TO PLACE EXPECTED CHAR IN LOBYTE. 
{DECREMENT THE I^MER LOOP COUNTER. 
(BRANCH TO READ ANOTHER CHAR IF 3 CHARS HAVE 
{NOT BEEN READ. 

{RESTORE THE DATA BYTES TO THE CORRECT POSITION 
{DECREMENT THE OUTER LOOP COUNTER. 
(BRANCH TO PCAO ANOTHER 3 CHARACTERS IF NOT 
(ALL 63 HAVE BEEN READ. 
(READ AND CHECK THE LAST CHARACTER. 
(BRANCH TO REPORT THE ERROR IF THE FIFO EMPTY. 
(TEST THE "EXIT ON ERROR" FLAG. 
(EXIT THE TEST IF SET. 
(OTHERWISE GO ANC TEST ANOTHER LINE. 

i REPORT THE ERROR. NOT ALL CHARACTERS TRANSMITTED. >>>>> 6009 <<<<<, 



BCC 


22> 


TST 


EXOERR 


BNE 


601 


INC 


RO 


INCB 


R3 


SWAB 


R3 


DEC 


R2 


BNE 


20$ 


SUAB 


RS 


DEC 


R4 


BNE 


16> 


JSR 


PC.REPDER 


BCC 


22i 


TST 


EXOERR 


BNE 


601 


BR 


241 



151200 



22$ i 



MOV •6009. .ERRNBR 
MOV •EM6006,R3 



(SET THE ERROR NUMBER TO 600<>. 
(PASS THE MESSAGE. 
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SEQ 189 



7482 
748S 
7484 
7485 
7486 
7487 

7488 
7489 
7490 
7491 
7492 
7493 
7494 
7495 
7496 
7497 
7498 
7499 
7500 
7501 
7502 
7503 
750* 
7505 



/506 
7507 



7508 
7509 



032656 
032660 
032664 
032666 
032674 
032674 
032676 
032700 
032706 



010104 
012701 
010002 
012767 

104460 
010401 
032767 
001414 



000100 
012276 



151162 



000100 147302 



t 
t 



HOV R1.R4 

MOV ^64., Rl 

MOV R0.R2 

MOV ^R6001.ERReLK 
ERROR 

MOV R4,R1 

BIT «eiT06,QPTI0N 

BEQ 601 

ALL ACTIVE LINES HAVE BEEN 

TEST ANOTHER LINE. 



I "TX FIFO BAO. TOO FEU LHA?S RECIEVEO*' 

I PASS THE LINE NUMBER OF THE UUT . 

I PASS THE EXPECTED NUMBER OF CHARACTERS. 

I PASS THE ACTUAL Nl^ER RECIEVED. 

iSET UP THE ERROR REPORTING ROUTINE. 

TRAP CIERROR 

; RESTORE THE LINE N'JMBER. 

I HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
I EXIT THIS TEST IF IT HAS. 

TESTED THEN EXIT THE TEST, OTHERWISE BRANCH TO 



Six f lU 








TQT 




(HAVE ALL LINES BEEN TESTED ? 
















{YES. THEN GO AND REPORT ERROR SUMhARIES 


IF 














t NECESSARY. 




032714 


005201 






INC 


Rl 


(OTHERWISE SELECT THE NEXT LINE. 




032716 


000612 






BR 


14$ 


lANO BRANCH TO TEST IF IT IS ACTIVE. 




032720 


004767 


163746 


50): 


JSR 


PC.TSABRT 


(REPORT NGN -RELATED TEST ERROR. 




032724 


000405 






BR 


60$ 


(ABORT THE TEST. 




032726 


0127€7 


013572 


151116 52t: 


MOV 


46010.. ERRNBR 


(SET THE ERROR NUMBER TO 6010. 




032734 


004767 


163314 




JSR 


PC.REPSHR 


(REPORT ERROR SUMMARIES IF NECESSARY. 




032740 






60$: 


SETPRI 


«PRI07 


(DISABLE ALL INTERRUPTS. 




032740 


012700 


000340 








MOV 


<K>RI07.R0 


032744 


104441 










TRAP 


CtSPRI 


032746 


004767 


164244 




JSR 


PC.TXIEO 


(CLEAR THE TX-INT ENABLE BIT IN THE DEVICE CSR. 


032752 








CLRVEC 


TXVECA 


(CLEAR DOUN THE TX-INT VECTOR. 




032752 


016700 


147240 








MOV 


TXVECA.RO 


032756 


104436 










TRAP 


CICVEC 


032760 


005067 


147264 


621: 


an 


CTRLCF 


1 INDICATE THAT UE ARE NOT WITHIN A TEST. 




032764 








ENDTSr 








032764 












L 10045: 




032764 


104401 










TRAP 


C»ETST 
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SEQ 190 



7511 
7512 
7515 
7514 
7515 
7516 
7517 
75 1« 
7519 
7520 
7521 
7522 

7523 
7524 
7525 
7526 
7527 
7528 
7529 
7530 
7531 
7532 
7533 
7534 
7535 
7536 
7537 
7536 
7539 
7540 
7541 
7542 
7543 
7544 
7545 
7546 
7547 
7546 
7549 
7550 
7551 
7552 
7553 
7554 
7555 
7556 
7557 
7558 
7559 
7560 
7561 
7562 
7563 
7564 
7565 
7566 



032766 
032766 

032766 

032774 
033002 
033010 
033016 



033024 
033030 



033032 
033036 
033042 
033046 
033052 



033056 
033062 



033066 
033072 



033076 
033102 
033106 



012767 
000021 
012767 
012767 
012767 
012767 



177777 147254 



000021 
000001 
014401 
010307 



147252 
151040 
151034 
151030 



004767 161166 
103165 



012705 177777 

012700 000200 

004767 164504 

012704 000012 

004767 161204 



012700 156430 
004767 164514 



016705 147126 
004767 164024 



005267 150750 
004767 162344 
103136 



.SBTTL HARDWARE TEST 



BREAKB 



- BREAK GENERATION TEST - 
THIS TEST VERIFIES THAT ALL SERIAL TRANSMIT LINES CAN GENERATE A BREAK 
BY SETTING THE BRK BIT IN THE ASSOCIATED LNCTRL REGISTER. 
USE OF THE INTERNAL LOOPBACK FEATURE OF THE OUARTS IS MADE TO MINIMISE 
ANY EXTERNAL EFFECTS CAUSED ON THE SERIAL LINES BY THIS TEST. 
FRAMING ERROR DETECTION IS USED TO INDICATE THE PRESENCE OT A BREAK. 
BY SETTING THE APPROPRIATE BIT IN THE RBUF REGISTER. 



BGNTST 



MOV 

TNUM 

MOV 

MOV 

MOV 

MOV 



•-I.CTRLCF 
• TNUM * 1 
•TNUM.TSTNUM 
n.ERRi'YP 
•6401..ERRNBR 
fEM6401.ERRMSG 



T17:: 

•INDICATE THAT UE ARE IN A TEST. 
I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (64) 
iSET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET THE FIRST ERPOR NUMBER IN ERROR TABLE. 
iSET ERROR MESSAGE ADDRESS IN ERRTBL. 



i • 

t 

t 

I 

t 



RESET THE OUT TO A KNOUN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 6401 <<<<«. 

JSR PC.CLNRST tPESET THE DHU*11. REPORT ANY ERRORS FOUND. 

BCC 60t lEXIT TEST IF FATAL ERROR FOUND. 



t 
i 

t • 



SET UP DEVICE UNDER TEST CDUT) TO: 

DISABLE TRANSMISSION AND RECEPTION INTERRUPTS. 
DELAY FOR 10 MILLI -SECONDS TO ALLOW TIME TO CLEAR ANY BREAKS. 



MOV MIAPLNS.RS iPASS ACTIVE LINE BIT MAP. 

MOV •200.ro iPASS INTERNAL LOOPBACK MODE. 

JSR PC.WTWLNC I SELECT INTERNAL LOOPBACK, DISABLE DMA. 

MOV •10..R4 iPASS DELAY TIME OF 10 MILLI SECONDS. 

JSR PC. DELAY iDELAY TO AI.LOW ANY BREAKS 70 BE CLEARED. 

TsET UP TRANSMISSION AN RECEPTION PARAMETERS FOR ALL LINES. 
I 9600 BAUD.8 CHAR.l STOPBIT.NO PARITY. 

MOV •I56430.R0 i SET UP BAUD RATE. ETC. 

JSR PC.WTULPR I SET COMMUNICATION PARAMETERS ON ALL LINES. 

i ♦ 



( ENABLE TRANSMITTERS ON ALL ACTIVE LINES. 



I - 



I ♦ 



MOV ACTLNS.R5 iPASS ACTIVE LINE BIT MAP. 

JSR PC.TXENBL lENABLE TRANSMISSIONS ON ALL LINES. 



I PURGE THE FIFO OF ANY UNWANTED CHARACTERS, 
i THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6402 THRU 6404 <<<<< 



t - 



« ♦ 



INC ERRNBR iSET ERROR NUMBER TO 6402. 

JSR PC.PUFIFR I PURGE FIFO. 

BCC 601 (ABORT TEST IF FIFO WILL NOT CLEAR. 

VERIFY BREAK GENERATION ON INDIVIDUAL LINES. 



J15 
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SEO 19t 



7567 
756a 
7569 
7570 
7571 
7572 
7575 
7574 
7575 
7576 
7577 
7576 
7579 
7560 
7581 
7562 
7563 
7564 
7585 
7586 
7587 
7586 
7569 
7590 
7591 
7592 
7593 
7594 
7595 
7596 
7597 
7596 
7599 
7600 



7601 
7602 
7603 
7604 
7605 
7606 
7607 
7606 
7609 
7610 
7611 
7612 
7613 
7614 
7615 
7616 
7617 
7618 
7619 



033110 
033112 
033116 
033122 
033124 
033130 
03S1S4 
033140 



033144 
033146 
033152 



033156 
033162 
033166 
033172 
033176 
033200 

033204 
033204 
033206 
033210 
033212 



Ji3214 
033222 



033224 
033226 
033230 
033234 



005002 
012703 
030367 
001440 
012700 
004767 
012704 
004767 



010305 
012700 
004767 



012704 
004767 
017700 
032700 
001012 
012701 



104455 
014405 
010307 
012400 



032767 
001470 



006303 
005202 
020227 
001330 



000214 
164374 



000005 
161074 
147036 
020000 

010344 



CLEAR BREAKS ON ALL LINES. 

DELAY FOR 10 MILLI-SECONDS TO ALLOW TIME FOR ANY BREAKS TO BE CLEARED. 
SELECT LINE. SET BREAK BIT IN LNCTRL REGISTER. 
TEST FOR A CHARACTER IN THE FIFO WITH FRAME ERROR. 





21: 


CLR 


R2 


J CLEAR LINE COUNTtR. 


000001 




MOV 


♦1.R3 


iSET UP ACTIVE LINE BIT MASK. 


147076 


41: 


BIT 


R3.ACTLNS 


1 CHECK IF THIS LINE IS ACTIVE. 






BEQ 


61 


iGO SELECT NEXT LINE IF THIS ONE IS INACTIVE 


000200 




HOV 


♦200.R0 


•SET UP PARAMETER TO CLEAR BREAK BITS. 


164416 




JSR 


PC.WTWLNC 


1 CLEAR BREAK BIT.RE<:'.;LECT INTERNAL LOOPBACK. 


000012 




HOV 


•10.. R4 


iPASS DELAY TIME QT 10 MILLI SECONDS. 


161116 




JSR 


PC. DEL AY 


1 DELAY TO ALLOW B'4EAKS TO BE CLEARED. 



61: 



SET BREAK BIT ON SELECTED LINE. 
SET UP PARAHETFRS TO TEST FOR THE FRAME ERROR BIT SET IN RBUF. 
TIME -OUT - 5 MILLI SECONDS. 
CALL ROUTINE TO CHECK FOR CONDITION FOUND. 

HOV R3.R5 iCOPY ACTIVE LINE BIT MASK. 

MOV •214.ro iSET BREAK. RESELECT LOOPBACK . ENABLE RECEPTION. 

JSR PC.WTWLNC >SET BREAK ON SELECTED LINE. 

!*DELAY FOR 5 HS TO ALLOW TIME FOR BREAK TO BE GENERATED AND RECEIVED. 
I VERIFY RECEPTION OF A CHARACTER WITH FRAME ERROR BIT SET. 

' MOV •5..R4 I SET DELAY VALUE TO 5 MILLI SECS. 

JSR PC. DEL AY i ALLOW TIME FOR CHARACTER RECEPTION. 

MOV SRBUFA.RO iGET CHARACTER FROM RBUF REGISTER. 

BIT •BIT13.ro (CHECK FOR FRAME ERROR BIT. 

BNE 81 iSKiP ERROR REPORT IF SET. 

HOV •EM6402.R1 i SELECT MESSAGE TO BE PRINTED. 



{REPORT ERR0R"6REAK NOT RECEIVED ON LINE •NN" 



ERROF 640S.EM6401.ER6401 i 



000100 146766 



000020 



> > > > > ERROR »6405 <<<<<. 

TRAP CtEROF 
.WORD 6405 
.WORD EM6401 
.WORD ER6401 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



6<: 



BIT •BIT06. OPTION 
BEQ 601 



ASL RS 

INC R2 

CMP R2.«NUHLNS 

BNE 41 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

I DURING THE SOFTWARE QUESTIONS. 

(SHIFT BIT MASK FOR NEXT LINE. 
iNEXT LINE 

I CHECK FOR MAX LINE COUNT. 

I IF o.LOOP TO CHECK NEXT LINE 



VERIFY BREAK GENERATION ON ALL LINES SIMULTANEOUSLY. 
CLEAR BREAKS ON ALL LINES. 

DELAY FOR 10 MILLI-SECONDS TO ALLOW TIME FOR ANY BREAKS TO BE CLEARED. 
PURGE THE FIFO. 

SET BREAK BIT IN LNCTRL REGISTERS ON ALL ACTIVE LINES. 
TEST FOR CHARACTERS IN THE FIFO WITH FRAME ERROR. 



ZQHVBO OHO 



TES1 



LI FUNC 



TST PART 2 MACf 
- BREAKS 



7620 
7621 
7622 
7623 
7624 
7625 
7626 
7627 
7628 
7629 
7630 
7631 
7632 
7633 
7634 
7635 
7636 
7637 
7638 
7639 
7640 
7641 
7642 
7643 
7644 
7645 
7646 
7647 
7648 
7649 
7650 
7651 
7652 
7653 
7654 
7655 
7656 
7657 
7658 
7659 
7660 



7661 
7662 
7663 
7664 
7665 



033236 
033242 
033246 
033252 
033256 



033262 
033266 



033270 
033274 
033300 



033304 

033310 
033314 
033316 
033322 
033326 
033330 
033334 
033336 
033340 
033344 
033350 
033352 
033354 
033356 
033360 
033362 

033366 
033366 
033370 
033372 
033374 
033376 

033400 
033404 
033410 
033410 
033410 



012705 
012700 
004767 
012704 
004767 



004767 
103044 



016705 
012700 
004767 



012704 
004767 
010502 
004767 
017701 
100011 
032701 
001406 
000301 
042701 
004767 
040005 
005302 
001362 
005705 
001411 
012701 



104455 
014406 
010307 
012400 
000402 

004767 
005067 



104401 



177777 
000200 
164300 
000012 
161000 



162102 



146724 
000214 
164246 



000012 
160746 

161354 
146702 

020000 



177400 
161300 



010344 



163266 
146640 
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MOV «MAPLNS,RS 

MOV «200.R0 

JSR PC.UTULNC 

MOV «10..R4 

JSR PC. DELAY 

I PURGE THE FIFO OF UNUA.'JTED CHARACTERS 

* JSR PC.PUFIFO 
BCC 501 

I SET UP PARAMETERS 
I THEN CALL ROUTINE 



I SET UP LINE TO CLEAR BREAKS ON. 
I SET UP PARAMETER TO CLEAR BREAK BITS. 
iCLEAR BREAK BIT.RCSELECT INTERNAL LOOPBACK. 
iPASS DELAY TII1E OF 10 MILLI SECONDS, 
t DELAY TO ALLOW BREAKS TO BE CLEARED. 



J PURGE FIFO. 

iGO REPORT ERROR IF FAILED TO CLEAN.OUT FIFO. 

FOR SETTING THE BREAK BIT ON ALL ACTIVE LINES. 
TO DO IT. 



loi: 



MOV ACTLNS.R5 tSET UP ACTIVE LINE BIT MASK. 

MOV «214.R0 tSET BREAK. RE SELECT LOOPBACK. ENABLE RECEPTION. 

JSR PC.UTULNC iSET BREAK ON SELECTED LINES. 



r DELAY FOR 10 MILLI SECONDS. TO ALLOW TIME FOR RECEPTION, 
t TEST FOR CHARACTERS IN FIFO WITH FRAME ERROR BIT SET. 
t - 



12$: 



14>: 



MOV 

JSR 
MOV 

JSR 
MOV 

BPL 
BIT 
BEQ 
SWAB 
BIC 

JSR 
BIC 
DEC 

BNE 
TST 

BEQ 
MOV 



«10..R4 I SET DELAY VALUE TO 10 MILLI SECS. 

PC. DELAY (ALLOW TIME FOR CHARACTER RECEPTION. 

R5.R2 jCOPY ACTIVE LINE BIT MAP. 

PC.MAPCNT i COUNT THE NUMBER OF LINES AVAILABLE. 

ORBUFA.Rl :GET CHARACTER FROM RBUF REGISTER. 

14$ {BRANCH IF OATA.VALID NOT SET. 

46IT13.R1 {CHECK FOR FRAME ERROR BIT. 

14» iDO NOT CLR FLG FOR THIS LINE IF FRAME BIT CLR. 

Rl {GET LINE NUMBER IN LOU BYTE. 

«177400.R1 tCLEAR EVERTHING BUT THE LINE NUMBER. 

PC.LINBIT iCALC BIT MASK FROM LINE NUMBER. 

R0.R5 t CLEAR LINE FLAG. 

R2 {DECREMENT THE LINE NUMBER COUNTER. 

12$ I LOOP TO GET THE NEXT CHARACTER. 

RS {CHECK IF ANY BREAKS NOT RECEIVED. 

60$ {EXIT TEST IF ALL CLEAR. 

{SELECT MESSAGE TO BE PRINTED. 



•EM6402,R1 

{REPORT ERROR'BREAK NOT RECEIVED ON LINE «NN'' 
ERROF 6406.En6401.ER6401t 



501; 
60$: 



BR 

JSR 

CLR 
ENOTST 



60t 

PC.TSABRT 
CTRLCF 



lEXlT TIC TEST. 



>>>>> ERROR #6407 <<<<<. 

TRAP OERDF 
.WORD 6406 
.WORD EM6401 
.WORD ER6401 



(ABORT THE TEST. 

(INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10046: 



TRAP 



csersT 
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7667 
7666 
7669 
7670 
7671 
7672 
7673 
7674 
7675 
7676 
7677 
7678 
7679 
7680 
7681 



NORERR 



SEQ 193 



7682 



7683 
7684 
7685 
7686 
7687 
7688 
7689 
7690 
7691 
7692 
7693 
7694 
7695 
7696 
7697 
7698 
7699 
7700 
7701 
7702 
7703 
7704 
7705 
7706 
7707 
7708 
7709 
7710 
7711 
7712 
7713 
7714 
7715 
7716 
7717 
7718 
7719 
7720 



033412 
033412 
033412 
033412 
033416 

033420 
033426 
033434 
033442 
033450 



033456 
033462 
033464 



033470 
033474 
033476 
033502 



033506 
033512 
033516 
033522 
033526 
033532 
033536 
033542 



.SBTTL HARDWARE TEST 



NORERR - 



* 

* 
* 
* 

* 

* 

i 



- NO OVERRUN ERROR TEST - 

THIS TEST VERIFIES THAT THE DUT WILL NOT REPORT DATA OVERRUN 
ERRORS WHEN THEY 00 NOT OCCUR. 

THIS TEST PUTS 256 CHARACTERS IN THE OUT riFO PLUS 4 IN EACH ACTIVE 
UART AND VERIFIES THAT NO OVERRUN ERRORS ARE REPORTED. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 
HOWEVER 7KE BHP CODE WILL BE PLACED OH THE BHP CODE QUEUE. TO BE 
REPORTED LATER. 



012700 
104441 

000022 
012767 
012767 
012767 
012767 
012767 



000240 



000022 
177777 
000001 
014711 
01040S 



BGNTST 

SETPRI «PRI05 



146626 
146614 
150406 
150402 
150376 



TNUM 

nov 

MOV 
MOV 
MOV 
MOV 



• TNUM ♦ I 
♦TNUM.TSTNUM 
f-l.CTRLCF 
♦l.ERRTYP 
•6601..ERRNBR 



T18: : 

(ALLOW LTC INTERRUPTS. 

MOV «PRI05.R0 
TRAP CtSPRI 
t INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
J SET UP THE TEST NUMBER. C66) 
I INDICATE THAT WE ARE IN A TEST. 
(SET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET ERROR NUMBER TO 6601. 



4EM6601.ERRMSG iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



I RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM Tl-C FIFO. 
: CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
i THIS SUBROUTINE REPORTS ERROR >»» 6601 <«<<<. 



004767 160534 
103402 

000167 000432 



004767 160774 
103402 

000167 000420 

004767 161042 



JSR 
BCS 
JMP 



PC.CLNRST 

.*6 

601 



I RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
I SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
(EXIT THE TEST. FATAL ERROR WAS FOUND. 



005267 
012700 
004767 
012700 
004767 
012704 
004767 
012702 



150540 
000204 
164030 
177670 
164050 
000012 
160520 
002650 



TfIND an ACTIVE LINE ON WHICH TO PERFORM THE TEST, 
s INITIALIZE THE 256 BYTE DATA PATTERN. 

*' JSR PC.FINACT jFIHD AN ACTIVE LINE. 

BCS .♦6 I SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 

JMP 60» tEXIT THE TEST. FATAL ERROR WAS FOUND. 

JSR PC.INDATP I INITIALISE DATA PATTERN. 

r TRANSMIT A 265 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
{ AT 38. 4K BAUD. B BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

t - 

!*SET INTERNAL LOQPBACK ON THE SELECTED LINE. 

I TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINE. 

tSET THE ERROR REPORT NUMBER TO 6602. 
tPASS PARAMETER FOR INTERNAL LOPBCK. ENABLE RX. 
iINITILAISE THE LDC CONTROL REGISTER. 
iPASS THE LPR CONTENTS. 
iSET THE LPR CONTENTS TO S8.4K BAUD. 
(PASS DELAY TIME OF 10 MILLI SECONDS. 
I WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
tPASS THE START OF THE DATA PATTERN TO TX. 



INC 


ERRNBR 


MOV 


•204.ro 


JSR 


PC.WTWLNC 


MOV 


♦177670.R0 


JSR 


PC.WTWLPR 


MOV 


•10.. R4 


JSR 


PC. DELAY 


MOV 


•BUFBAS.R2 



1 TUNC TST PAI 



ERR 
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SEQ 194 



7721 
7722 
7723 
7724 
7725 
7726 
7727 
7728 
7729 
7730 
7731 
7732 
7733 
7734 
7735 
7736 
7737 
7736 
7739 
7740 
7741 
7742 
7743 
7744 
7745 
7746 
7747 
7746 
7749 
7750 
7751 
7752 
7753 
7754 
7755 
7756 
7757 
7758 
7759 
7760 
7761 
7762 
7763 
7764 
7765 
7766 
7767 
7768 
7769 
7770 
7771 
7772 
7773 
7774 
7775 
7776 
7777 



035546 
033552 
033556 



033560 
033564 
033570 
033574 
033600 
033602 
033606 



033612 
033616 
033622 
033626 
033632 
033636 
033642 

033646 
033652 
033656 
033660 
033664 
033666 
033670 
033676 
033700 
033704 
033706 
033710 
033714 

033716 
033722 
033726 
033732 
033736 
033740 
033744 



033750 
033754 
033760 
033762 
033764 
035770 



012705 
004767 
103157 



005267 
012701 
016702 
004767 
103146 
012704 
004767 



016705 
012700 
004767 
012700 
004767 
012704 
004767 

012702 
012703 
005001 
005267 
010100 
006300 
036067 
001403 
004767 
103104 
005201 
020127 
002763 

005267 
012701 
016702 
004767 
103067 
012704 
004767 



016702 
004767 
006302 
006302 
012705 
060205 



000400 
160622 



150266 
170536 
146432 
163636 

000005 
160450 



146402 
000204 
163724 
177670 
163744 
000012 
160414 

002650 
000004 

150166 



002336 
160474 

000020 



150130 
170040 
146274 

163500 

000005 
160312 



146244 
160716 



000400 



MOV 
JSR 
BCC 

! UAIT FOR 
» THE FIFO 



INC 
MOV 
MOV 

JSR 

BCC 
MOV 

JSR 



«BUFMID eUFBAS.R5 iPASS THE LENGTH OF THE DATA PATTERN. 

PC.OODMA {TRANSMIT THE DATA PATTERN. 

50$ lEXIT IF ERROR FOUND DURING DMA TX. 

DMA TO COMPLETE. THEN UAIT FOR THE LAST CHARACTER TO AF.RIVE IN 

ERRNBR tSET ERROR NUMBER TO 6603. 

n70536.Rl iPASS TIME-OUT VALUE OF 350 MILLI SECS. 

CSRA.R2 (PASS THE ADDRESS OF THE CSR. 

PC.UAIBIS lUAIT FOR DMA TO COMPLETE, TX.ACTION SET. 

50> tABORT THE TEST IF TIME-OUT ON DMA COMPLETION, 

«S.R4 (PASS DELAY OF 5 MILLI SECS. 

PC. DELAY I UAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



TRANSMIT 4 CHARACTERS ON EACH ACTIVE LINE. 



146322 



21: 



4<: 



MOV 


ACTLNS.R5 


MOV 


♦204.ro 


JSR 


PC.UTULNC 


MOV 


#177670. RO 


JSR 


PC.UTULPR 


MOV 


•10. .R4 


JSR 


PC. DELAY 


MOV 


•BUFBAS.R2 


MOV 


#4.R3 


aR 


Rl 


INC 


ERRNBR 


MOV 


Rl.RO 


ASL 


RO 


BIT 


BITTBL(RO) 


BEQ 


41 


JSR 


PC.OODMA 


BCC 


50$ 


INC 


Rl 


CMP 


Rl.«NUnLNS 


BLT 


2» 



INC 
MOV 
MOV 
JSR 
BCC 

NOV 
JSR 



ERRNBR 
n70040.Rl 
CSRA.R2 
PC.UAIBIS 

sot 

•5.R4 

PC. DELAY 



{ALTER PARAMETERS FOR ALL ACTIVE LINES. 
tPASS PARAMETER FOR INTERNAL LOPBCK. ENABLE RX. 
iINITILAISE THE LINE CONTROL REGISTER. 
I PASS THE LPR CONTENTS. 
}SET THE LPR CONTENTS TO 38. 4K BAUD. 
(PASS DELAY TIME OF 10 MILLI SECONDS. 
iUAIT FOR LNCTRL AND LPR KEGS TO BE UPDATED. 

{PASS THE START OF THE DATA PATTERN TO TX. 
tPASS THE LENGTH OF THE DATA PATTERN, 
t CLEAR THE LINE COUNTER. 
iSET ERROR NUMBER TO 6604. 

{CALCULATE THE LINE OFFSET FROM THE LINE 
.ACTLNS {TEST FOR THIS LINE BEING ACTIVE. 

{SKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 
{TRANSMIT THE 5 CHAR DATA PATTERN. 
{ABORT IF ERROR FOUND DURING DMA TX. 
{INCREMENT THE LINE COUNTER. 
{TEST FOR ALL POSSIBLE LINES HAIOLED 
{LOOP IF NOT ALL LINES HANDLED. 

(SET ERROR NUMBER TO 6605. 
{PASS TIIC-OUT VALUE OF 32 MILLI SECS. 
{PASS THE ADDRESS OF THE CSR. 
tUAIT FOR A DMA TO COMPLETE. TX.ACTION SET. 
{ABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 
{PASS DELAY OF 5 MILLI SECS. 
tUAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



: READ THE FIFO CHECKING FOR OVERRUN ERRORS. REPORT ERRORS IF FOUND. 
{ ABORT THE TEST IF A BMP CODE UAS FOUND IN THE FIFO. 



MOV 
JSR 
ASL 
ASL 
MOV 
ADD 



ACTLNS. R2 

PC.MAPCNT 

R2 

R2 

«256. .R5 
R2.R5 



(GET THE NUMBER OF ACTIVE LINES. 
{MULTIPLY NUMBER OF ACTIVE LINES B> 4. 
(CALCULATE NUMBER OF CHARACTERS TO RX. 



CZOHVBO OHU II TUNC TST PARTS MACRO MiaOO 
HARDWARE TEST NORERR 
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/ ( fO 


ATT 77-^ 


AA^AAA 




f ( f 


ATT77il 


A1 '5 7^7 


Al ^ 71 
Vll r XO 


7 7ft A 


AT^ AA'^ 


A1 7 7AO 


x*IOccc 


7 7ft 1 


AT^ AA^ 


« AAATiL. 




7 7 AD 








77AT 








7784 








( f O J 








77AA 
' f OD 








77A7 


ATAA1 A 


AAA7il7 


XP r r Oc 


77AA 
r rOO 


AT^A 1 JL 


1 ATAAO 




77AO 




1 AAAAA 

xu^iou 




f »^fv 


ATAAOA 


AAAAAA 




7"'01 
f ^1 








770D 






1 <\AAPA 


770T 


UO*tUcO 


A^*^DAA 




77QA 










AT^ATO 


AA^A^^I 
\J\JO\JO X 








A^P7AP 




7707 


AT^A^A 


AA1 7«%*% 




7 70A 

r »^0 


AT^A^O 


AA<\PA7 


1 ^AAAA 




AT^A^i: 


A1 P7A7 


A1 D^AA 


7800 


034054 


012701 


010442 


' oux 


AT^Al^A 


A1 APA''^ 




7AnD 

> OUc 




AAAXAX 




7Anx 
f ouo 




Vie f UO 


1 777iiA 
X ' f # OU 


IfiCiA 








f ov^ 




1 AAAAA 

xvt^ov 




7AAA 
' ov^ 








7 An 7 
f OW f 








7AnA 

» OvO 








7AOQ 
» ov^ 












AXP7I17 


AAA1 OA 
WV/XVV 






AA1 A1 A 












7A1 ^ 








7814 


ATA 1 OP 


AAA7TA 




7A1S 
■ ox ^ 












Al P7A7 

wXC « O f 


01 A7P1 

VX"* r CX 


7817 


034112 


020405 




7818 


034114 


001402 




7819 








7820 


034116 


004767 


162550 


7821 


034122 


005067 


146122 


7822 


034126 
034126 
034126 


104401 





CLR R4 

MOV «6606. .ERRNBR 

MOV SRBUrA,R2 

BPL 10 » 



J CLEAR THE CHARACTER COUNTER. 

J SET UP ERROR NUMBER EACH TIME AROUNO LOOP. 

iREAD A CHARACTER FROM THE FIFO. 

J EXIT THE READ LOOP IF THE FIFO IS EMPTY. 



CHECK IF THE READ CHARACTER IS A BMP CODE. 
IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER. 
ABORT THE TEST. 



AND 



I - 



8*: 



150002 



JSR 
BCC 
ERROR 

BR 

INC 
INC 

CMP 
BGT 

BIT 
BEQ 
INC 
MOV 
NOV 
MOV 
SUAB 
BIC 
; REPORT 

ERROR 



PC.CHKBMP 
81 



60» 

ERRNBR 
R4 

R4.R5 
50$ 

«BIT14.R2 
61 

ERRNBR 

«ER7801.ERRBLK 
«EM6602.R1 
R2.R3 
R3 

♦1 77760. R3 
OVERRUN ERROR 



: CHECK IF CHARACTER IS A BMP CODE. 

: BRANCH IF NOT A BMP CODE. 

s >>>>> ERROR 06606 <<<<<. 

TRAP C$ERROR 

I EXIT THIS TEST. 

iSET ERROR NUMBER TO 6607. 
; COUNT THIS CHARACTER. 

; COMPARE ♦ OF CHARS UITH MAX ♦ OF CHARS. 
J ABORT TEST IF TOO MANY VALID CHARS READ. 
;TEST THE OVERRUN BIT OF THE READ CHAR. 
(LOOP TO READ THE NEXT CHAR IF NO ERROR. 
:SET ERROR NUMBER TO 6608. 

: SELECT THE CORRECT ERROR REPORTING ROUTINE. 
{PASS THE MESSAGE TO BE REPORTED. 



sGET FAILING LINE NUMBER. 
REPORTED WHEN NONE FORCED. ON LINE NN . . . ' 
J >>>>> ERROR #6608 << 

TRAP 



C TERROR 



146110 



147740 10$ : 



50t: 
60$: 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 
BEQ 



BR 

MOV 
CMP 
BEQ 

JSR 
CLR 

enot«;t 



«BIT06. OPTION 
60$ 



6$ 

«6609. .ERRNBR 

R4.R5 

60$ 

PC.TSABRT 
CTRLCF 



;EXIT UITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

J DURING THE SOFTWARE QUESTIONS. 

{LOOP TO READ THE NEXT CHAR. 

:SET ERROR NUMBER TO 6609. 

(COMPARE NUMBER OF CHARS READ UITH EXPECTED. 
J EXIT TEST WITHOUT ABORT IF CORRECT 9 OF CHARS. 

; ABORT THE TEST. NON-RELATED TEST ERROR FOUND. 
{INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10047: 



TRAP 



C$ETST 



C/9HVB0 OK* 11 »UNC 
TIST 



15-HM «4 09:28 PAGC 12S 



SCO i'f*. 



7B24 

762* 
7827 
7828 
7829 
7630 
7891 
78S2 
789S 
78S4 
78S9 
78S6 
7857 
76 S8 

7659 



7640 
7641 
784? 
7645 
7644 
7645 
7646 
7647 
7646 
7649 
7650 
7651 
7652 
/855 
7854 
7855 
7856 
7857 
7856 
7859 
76«0 
7861 
7862 
7865 
7664 
7865 
7666 
7667 
7666 
7669 
7870 
7671 
7872 
7875 
7874 
7675 
7676 
7677 



094150 
094190 
094190 
094190 
094194 

094196 
094144 
09415? 
094160 
094166 



054 1 74 
054200 
054202 



054206 
054212 
054214 
054220 



094224 
054250 
094254 
094240 
054244 
094250 
094254 
094260 



012700 
104441 

000029 
012767 
012767 
012767 
012767 
012767 



004767 
105402 
000167 



004767 
105402 
000167 
004767 



005267 
012700 
004767 
012700 
004767 
012704 
004 767 
012702 



.SeTTL 



TEST 



TEST - 

THIS TEST VERITIES THAT TiC OUT UILL REPORT DATA OVERRUN CDRORS W»CN 
TtCV OCO*. 

THIS TEST PUTS 256 O W TO CTERS IN T>C OUT riTQ PLUS 5 IN EACH ACTIVE 
UNRT AND VERITIES THAT OVERRUN ERRORS ARE REPORTED ON ALL ACTIVE LINES. 
ANY tr9 CODE TOUO MILL IMVALIOATE T>C TEST AND CAUSE IT TO BE ABORTED. 
HO«VER T»C 99 CODE MILL BE PLACED ON THE Bt» CODE QUEUE. T*; BE 
REPORTED LATER. 



000240 



000029 
177777 
0<^1 
015055 
010514 



160016 
000660 

160256 

000646 
160524 



OGNTST 

SETPRI 4PRI05 



146110 
146076 
147670 
147664 
147660 



TNUn 

NOV 

NOV 

NOV 

HOV 

NOV 



T19* • 

I ALLOW LTC INTERRUPTS. 

MOV •PRIOS.RO 
TRAP ClSPftl 
tINCRENENT T»C ASSEMBLY TINE TEST COUNTER. 
iSET UP T»€ TEST NUr«ER. (67) 
tllttlCATE THAT IC ARE IN A TEST. 
iSET ERROR TYPE AS TATAL IN ERROR TABLE. 
iSET ERROR NUMBER TO 6701. 
«EH6701.ERRn5C iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



* TNUH • 1 
«TMft.TSTNUN 
♦-I.CTRLCT 
•I.ERRTVP 
♦6T0l..r" 



RESET THE OUT TO A KNOUN STATE. REMOVE THE STATUS COOES TROM THE riFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN T»C CSR. 
THIS SUBROUTINE REPORTS ERROR >»>>> 6701 <<<<<. 

JSR PC.CLWST (RESET THE OHU-U. REPORT ANY ERRORS rouNO. 

BCS ..6 iSKIP EXIT OT TEST IT NO FATAL ERROR FOUND. 

JNP 601 lEXlT THE TEST. FATAL ERROR WAS FOUND. 



i ♦ 
I 
I 

I - 



FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 
INITIALIZE T»C 256 BYTE DATA PATTERN. 

JSR PC.FINACT iFIND AN ACTIVE LINE. 

BCS .*6 I IF ACTIVE LINE IS FOUND. DON'T ABORT TEST. 

JMP 60t lABORT THE TEST. NO ACTIVE LINES WERE TOUND. 

JSR PC.INDATP {INITIALISE DATA PATTERN. 



147622 
000204 
169512 
177670 
165952 
000012 
160002 
002650 



I TRANSMIT A 265 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
I AT 98.4K BAUD. 8 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

I - 

!*SET INTERNAL LOOPBACK ON THE SELECTED LINE. 

I TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINE. 

' INC ERRN8R iSET ERROR NU9ER TO 6702. 

MOV •204.ro tRASS PARAMETER TOR INTERNAL LOPBCK.ENABlF Rx, 

JSR PC.WTWLNC iINITILAISE T»€ LINE CONTROL REGISTER. 

MOV •177670.ro «PASS THE LPR CONTENTS. 

JSR PC.WTWLPR iSET THE LPR CONTENTS TO 58. 4K BAUD. 

MOV 610. .R4 iPASS DELAY TIME OF 10 MILLi SECONDS. 

JSR PC.OELAT {WAIT FOR LNCTRL AND LPR REGS TO BE UPQATEO. 

MOV •BUTBAS.R2 jPASS THE START OF THE DATA PAT f CRN TO TX. 



Mum ^^sf 



79 76 

m79 

7000 

7861 

7662 

7665 

7664 

7M5 

7566 

7697 

7669 

766<f 

76^ 

7691 

7692 

7695 

769* 

769i 

7696 

7097 

7096 

7099 

7900 

7901 

7902 

7905 

7904 

7905 

7906 

7907 

7906 

7909 

7910 

7911 

7912 

7915 

7914 

7915 

7916 

7917 

7916 

7919 

7920 

7921 

7922 

7925 

7924 

7925 

7926 

7927 

7926 

7929 

7950 

7951 

7«*52 

7955 

7954 
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u iO 
PUGE 125 1 



SEO 197 



054^64 
054270 
054274 
054276 



054502 
054506 
054512 
054516 
054522 
054524 
054550 
054554 



054540 
054544 
054550 
054554 
054560 
054564 
054570 

054574 
054400 
054404 
054406 
054412 
054414 
054416 
054424 
054426 
054452 
054454 
054440 
054442 
054446 

054450 
054454 
054460 
054464 
054470 
054472 
054476 



054502 
054506 
054514 
054520 



012705 000400 

004 767 160104 
105402 

000167 000560 



005267 
012701 
016702 
004767 
105402 
000167 
012704 
004767 



016705 
012700 
004767 
012700 
004767 
012704 
004767 

012702 
012705 
005001 
005267 
010100 
006500 
056067 
001405 
004767 
105402 
000167 
005201 
020127 
002761 

005267 
012701 
016702 
004767 
105174 
012704 
004767 



147544 

170556 
145710 
165114 

000552 
000005 
157722 



145654 
000204 
165176 
177670 
165216 
000012 
157666 

002650 
000005 

147440 



002556 
157746 
000422 
000020 



147576 
170040 
145542 
162746 

000005 
157560 



012704 000400 

012767 015062 

017702 145510 
100160 



NOV 

scs 



•eUFNIO 8UFBAS.ft5 iPASS T»€ LENGTH OF r»€ DATA PATTEMl. 



PC. Doom 

.•6 
SO* 



3 irWSb 

iTMNSNIT T»€ DATA PATTERN. 
tJF NO EfWOR FOUND OURING OHA Tx. DON'T AeORT. 
T TEST. EfWOR FOUND DURING DMA Tx. 



I MAIT FOR OKA TO COMPLETE. 

I THE rxro. 

I - 

IMC 
NOV 

NCV 
JSR 
BCS 

NOV 
JSR 



#1 70556. Rl 

CSRA.R2 

PC.UAIBIS 

• •6 

SOI 

•S.R4 

PC. DELAY 



T»CN MAIT FOR T»C LAST CHARACTER TO ARRIVE IN 



I SET ERROR NUMBER TO 6705. 
iPASS TZrC-OUT VALUE OF 550 MILL I SECS. 
I PASS TME ADDRESS OF THE CSR. 
lUAIT FOR DMA TO COMPLETE. TX.ACTION SET 
tIF NO Tire -OUT ON DMA COMPLETION. DON T 
lABORT TEST. TIME-OUT ON DMA COMPLETION. 
I PASS DEL AT OF 5 MILL I SECS. 
iUAIT FOR LAST CHAR TO ARRIVE IN T»C FIFO. 



ABORT. 



TRANSMIT 5 CHARACTERS ON EACH ACTIVE LINE. 



2»: 



145574 



4t: 



MOV 


ACTLNS.R5 


MOV 


4204.ro 


JSR 


PC.UTULNC 


MOV 


♦177670. RO 


JSR 


PC.UTULPR 


MOV 


•10.. R4 


JSR 


PC. DEL AY 


MOV 


•BUF8AS.R2 


MOV 


•5.R5 


CLR 


Rl^ 


INC 




MOV 


Rl.RO 


ASL 


RO 


BIT 


BITTBLCRO) 


BEO 


4< 


JSR 


PC.OOOMA 


BCS 


.•6 


JMP 


50t 


INC 


Rl 


CMP 


R1.4NUMLN3 


BLT 


21 



I ALTER PARAMETERS FOR ALL ACTIVE LINES. 

I PASS PARAMETER FOR INTERNAL LOPBCK. ENABLE RX. 

iINITlLAISE T»C LINE CONTROL REGISTER. 

I PASS THE LPR CONTENTS. 

I SET THE LPR CONTENTS TO 58. 4K BAUD. 

I PASS DELAY TIME OF 10 MILL I SECONDS. 

I WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 



iPASS T»C START OF THE DATA PATTERN 70 
I PASS THE LENGTH OF THE DATA PATTERN. 
I CLEAR THE LINE COUNTER. 
(SET ERROR NUr«ER TO 6704. 



TX. 



INC 
MOV 
MOV 

JSR 

BCC 
MOV 

JSR 



ERRNBR 

•1 70040. Rl 

CSRA.R2 

PC.UAIBIS 

50« 

•5.R4 

PC. DELAY 



•CALCULATE LINE OFFSET FROM THE LINE •. 
.ACTLNS I TEST FOR THIS LINE BEING ACTIVE. 

I SKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 

•TRANSMIT THE 5 CHAR DATA PATTERN. 

I IF NO TIME-OUT ON DMA COMPLETION. DON'T ABORT. 

lABORT TEST. TIME-OUT ON OHA COMPLETION. 

•INCREMENT THE LINE NUMBER COUNTER. 

I TEST FOR ALL POSSIBLE LINES HANDLED 

I LOOP IF NOT ALL LINES HANDLED. 

tSET ERROR NUI«ER TO 6705. 
I PASS TIME-OUT VALUE OF 52 MILL I SECS. 
iPASS THE ADDRESS OF THE CSR. 
lUAIT FOR A OHA TO COMPLETE. TX.ACTION SET. 
lABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 
tPASS DELAY OF 5 MILLI SECS. 
tUAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



!*REAO 256 CHARS FROH THE FIFO CHECKING FOR BMP COOES, 
i ABORT THE TEST IF A BMP CODE WAS FOUND IN THE FIFO. 



I • 

147556 6>t 



HOV #256.. R4 

HOV 46706. .ERRNBR 

MOV SRBUFA,R2 

BPL 501 



I SET UP T»C CHARACTER COUNTER. 

iSET UP ERROR NUMBER EACH TIME AROUND LOOP. 

I READ A CHARACTER FROM THE FIFO. 

lABORT THE TEST IF DATA. VALID IS CLEAR. 



I f UNC Tsr Pi 
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%0 1^ 



7955 


054522 


005267 


147524 


7936 


054526 


004767 


157244 


7957 


054552 


105551 




795a 


054554 


005304 




7959 


054556 


001563 




7940 








7941 








7942 








7945 


054540 


005004 




7944 


054542 


012700 


005710 


/945 


054546 


004767 


157466 


7946 


054552 


012767 


015064 


7947 


034560 


017^02 


145444 


7946 


034564 


100047 




7949 


034566 


004767 


157204 


7950 


034572 


105551 




7^*51 


034574 


005267 


147252 


7952 


034600 


010200 




7955 


054602 


000300 




7954 


034604 


042700 


177760 


7955 


034610 


006300 




7956 


034612 


042702 


007400 


7957 


034616 


036067 


002336 


7956 


034624 


001516 




7959 


034626 


005267 


147220 


7960 


034632 


005760 


005710 


7961 


034636 


001006 




7962 


034640 


020227 


140000 


7963 


034644 


001414 




7964 


034646 


056004 


002336 


7965 


034652 


000411 




7966 


034654 


026027 


003710 


7967 


034662 


002077 




7966 


034664 


032702 


040000 


7969 


0S4670 


001402 




7970 


034672 


056004 


002336 


7971 


034676 


005260 


005710 


7972 


034702 


000725 




7975 








7974 








7975 








7976 








7977 








7978 


034 ^04 


005001 




7979 


034706 


012767 


015067 


7960 


034714 


036167 


002336 


7981 


034722 


001415 




7962 


034724 


026127 


003710 


7963 


054732 


002453 




7964 


034734 


036104 


002536 


7985 


034740 


001006 




7986 


034742 


005267 


147104 


7987 


034746 


026127 


003710 


7988 


034754 


001042 




7989 


034756 


062701 


000002 


7990 


054762 


020127 


000040 


7991 


054 766 


002747 





ERRNBR iSET ERPOR NUMBER TO 6707. 

PC.CMCBMP iCHECK IF CHARACTER IS A BMP CODE. 

24« iREPORT ERROR AND ABORT TEST ir A BMP CODE. 

R4 t COUNT THIS CHARACTER. 

6» iLOOP If NOT 2S6 CHARS READ rROH FIFO. 

READ THE REMAINING AND VERIFY 1 OVERRUN PLUS 1 CHAR FROM EACH LINE. 



INC 
JSR 
BCS 

oec 



CLR R4 

MOV MXCNTB.RO 

JSR PC.CLR16U 

6i: MOV 46708.. ERRNBR 

MOV 8RBUFA.R2 

BPL 141 

JSR PC.CMKBMP 

BCS 241 

INC ERRNBR 

MOV R2.R0 

SUAB RO 

BIC •l7n60.R0 

ASL RO 

BIC #7400. R2 

BIT BITTBL(RO).ACTLNS 

BEQ sot 

INC ERRNBR 

TST RXCNTB(RO) 

BNE 101 

CMP R2. #140000 

BEQ 12» 

BIS BITTBL(R0).R4 

BR 121 

10»: CMP RXCNTB(R0).*4 

BGE sot 

BIT 4BIT14.R2 

BEQ 12 t 

BIS BITTBL(R0).R4 

INC RXCNTB(RO) 

BR at 



I CLEAR THE OVERRUN ERROR FLAGS. 



CLEAR RX CHAR COUNT TABLE. 
SET UP ERROR NUMBER EACH TIME AROUND LOOP. 
READ A CHARACTER FROM THE FIFO. 
GO ANALYZE THE RESULTS IF ALL CHARS READ. 
CHECK IF CHAR IS A BMP CODE. 
REPORT ERROR AND ABORT TEST IF A BMP CODE. 
SET ERROR NUMBER TO 6709. 



CALCULATE THE LINE NUMBER OF THE CHAR. 
FORM WORD TABLE OFFSET FOR TABLE ACCESS. 
REMOVE LINE NUMBER FROM THE READ CHAR. 

J TEST FOR ACTIVE LINE. 
ABORT TEST IF FOR INACTIVE LINE. 
SET ERROR NUMBER TO 6710. 
CHECK THE RX CHAR COUNTER FOR THIS LINE. 
IS THIS FIRST CHAR ON LINE? 
YES. TEST FOR NULL CHAR UITH OVERRUN. 
IS CHAR A NULL? 

NO. SET THE OVERRUN BIT ERROR FLAG FOR LINE. 
GO COUNT THE CHAR AND CONTINUE. 

5TH CHAR ON THIS LINE? YES. ABORT. 
NO. CHECK OVERRUN BIT. 

IS OVERRUN BIT CLEAR? YES. GO COUNT CHAR. 
NO. SET THE OVERRUN BIT ERROR FLAG FOR LINE. 
COUNT THIS CHARACTER. 

LOOP UNTIL ALL CHARS ARE READ FROM FIFO. 



12t: 

TtEST for ABORT CONDITIONS. ONLY NONE ABORT CONDITIONS ARE: 

t 1)2 CHARS RXED ON A LINE AND NO OVERRUN ERROR BIT FAILURE DETECTED. 

t 2) 2 TO 4 CHARS RXED ON A LINE AND AN OVERRUN BIT FAILURE DETECTED. 

Uti CLR Rl {INITIALIZE LINE LOOP. CLEAR LINE OFFSET. 

16t: MOV 46711., ERRNBR iSET UP ERROR NUMBER EACH TIME AROUND LOOP. 
BITTBLCRD.ACTLNS 

lat iLINE ACTIVE? NO. NEXT LINE. 

RXCNTB(R1).#2 I YES. 

iFEUER THAN 2 CHARS RXED? YES. ABORT. 
tNO. 

lOVERRUN BIT ERROR FLAG SET? YES. NEXT LINE. 
(SET LINE NUMBER TO 6712. 



CLR 
MOV 
BIT 

BEQ 
CMP 

BLT 
BIT 

BNE 
INC 
CMP 



sot 

BITTBL(R1).R4 
18t 



18t: 



ADO 
CMP 
BLT 



RXCNTB(R1).*2 

sot 

•2.R1 

R1.«NUMLNS*2 
16 1 



tNOT 2 CHARS RXED? YES. ABORT. NO. NEXT LINE. 
tSET LINE OFFSET TO THE NEXT LINE. 

(ALL LINES DONE? NO. LOOP. >ES. CONTINU . 



CZOHVBO OHU 11 fUHC TST HACAO H1200 

HAROUARC TEST « OREfm - 



15 HAft 54 09:28 



Lib 
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7QO^ 
















/ ^TT^ 








TOM 


AXA77A 


A1 57A7 


Al SA71 






AA^^AAl 




7007 


AV^AAA 


A1 A1 AO 




70^11 




A^l AA 




70<M 




AA1 <l 






A^<^1 A 


A1 A1 AY 




6001 


055012 


006205 




ow< 




Al ^7A7 




OW^ 




At 97A1 


Al A^6 


II AAA 








OWJ 








IIAAI« 








AAA 7 








AAAA 








AAAQ 








AAl A 




ASP 7^7 


AAA I AO 


AA1 1 
















AAt % 








AA1 A 




Al APA1 
v4VcV4 








AAI^I A4 








AA1 AA7 




8017 


055050 


062701 


000002 






AAA7^1 












80P0 








8021 










AKAAA 


AAAAA9 




802S 








8024 


035062 


004767 


161604 


6025 


055066 


005067 


145156 


6026 








8027 


055072 
055072 
055072 


104401 





I ♦ 



CHECK FOR OVERRUN ERROR BIT fAILURES. PRINT ERROR MESSAGE IF FOUND. 



147054 



I - 



20 1 



.ERRNBR 



147034 



•6715. 

Rl 

R1.R2 

8ITTBLCR1).R4 

22% 

R1.R3 

R3 

«ER7a01.ERRBLK 
•EH6702.R1 



I SET UP ERROR NUr«ER. 

iINITIALIZE LOOP. CLEAR LINE OFFSET. 
iCOPY THE LINE OFFSET. 
lOVERRUN BIT FAILURE FLAGS ARE IN R4. 
:ERROR FLAG CLEAR? YES. NEXT LINE. 

iCALCULATE LINE NUMBER FROM LINE OFFSET. 
(SELECT THE CORRECT ERROR REPORTING ROUTINE. 
tPASS THE MESSAGE TO BE REPORTED. 



MOV 
CLR 
MOV 
BIT 
BEQ 
MOV 
ASR 
MOV 
MOV 

{REPORT "OVERRUN ERROR NOT REPORTED CORRECTLY UHEN FO»CEO. ON LINE NN 
ERROR » >>>>> ERROR •6715 <<<<<. 

TRAP CtERROR 



145152 



TeXIT the test if extended error REPORTING HAS NOT BEEN ENABLED 

* lEXIT UITH TEST FAILURE MESSAGE IF 

iNG EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
(DURING THE SOFTWARE QUESTIONS. 



BIT 
BEQ 



•6IT06.0PTI0N 
60> 



22%: 



24$ I 



50»i 
60<: 



MOV R2.RI 

BIC BITTBL(R1}.R4 

BEQ 601 

ADD •2.R1 

BR 20* 



(RESTORE THE LINE OFFSET THAT UAS DESTROYED. 
(CLEAR THE LINE ERROR FLAG UE JUST HANDLED. 
(ALL FAILURE BITS HANDLED? YES. EXIT TEST. 
(NO. INCREMENT THE LINE OFFSET. 
(LOOP TO HANDLE THE NEXT LINE. 



(REPORT "BMP CODE FOUND IN FIFO. TEST INVAILDATED. " 

ERROR > ^ > > > > ERROR <<<<<. 

TRAP 

BR 60< (EXIT THIS TEST. 



CtERROR 



JSR 
CLR 

ENDTST 



60< 

PC.TSABRT 
CTRLCF 



(ABORT THE TEST. ERROR ♦ INDICATES FAULT TYPE. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 



LIOOSO: 



TRAP 



C»ETST 



CZOHVBO DHU 11 fONL TbT PART2 
HAROUARL TESI • REPdMP 



e029 
6050 
8051 
6052 
8055 
8054 
8055 
8056 
805 7 
8056 
6059 
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SEQ 200 



.S6TTL HAROUARE TEST 



REPBHP 



- REPORT ANY BHP COOES IN THE QUEUE - 
THIS IS A PSEUDO-TEST USED TO REPORT ANT BMP CODES THAT UERE FOUND 
IN THE DUfS FIFO DURING PREVIOUS TEST. AND LOGGED IN THE BMP CODE 
QUEUE. 

ir IS UNLIKELY THAT RUNNING THIS PSEUDO-TEST ALONE UILL PRODUCE ANT 
ERROR REPORTS. 



6040 
8041 
8042 
8045 
6044 
6045 
8046 
6047 
6046 
6049 
6050 
6051 



055074 
055074 

055074 
055102 
0^5110 
05M14 
05&120 
035122 



000024 

012767 
012'67 
016702 
01*; 705 
020205 
001411 



000024 
177777 
145274 
002412 



145152 
145140 



BGNTST 

TNUM • 
MOV 
MOV 
MOV 
MOV 
CMP 
BEQ 



' TNUM ♦ 1 
•TNUM.TSTNUM 
•l.CTRLCF 
BMPCQP.R2 
«6MPCQB.R3 
R2.R5 
60< 



T20: : 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

J SET UP THE TEST NUMBER. (95) 

J INDICATE THAT UE ARE IN A TEST. 

tGET THE CONTENTS OF THE POINTER. 

iGET THE START ADDRESS OF THE QUEUE. 

J SEE IF THE POINTER HAS MOVED FROM THE BASE. 

lEXIT NO CODES IN THE QUEUE. 



J ♦ 



6052 


035124 


012701 


011554 


MOV 


8053 


035130 
035130 
035152 
035134 
035136 


104455 

022125 
011200 
015176 




ERROF 


60S4 










8055 


055140 


012767 


002412 145242 


MOV 


6056 










8057 


035146 


005067 


145076 60 « : 


CLR 


BOSS 


055152 
035152 
055152 


104401 




ENDTST 



THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 

(REPORT ERROR BMP CODE FOUND IN TEST NN. BMP COOE:NNNNNN" 

4EM9504.R1 :PASS THE FIRST MESSAGE TO BE REORTEO. 

9501.EM9501,ER9501 j >>>>> ERROR #9501 <<<<< 

TRAP 
.UORD 
.UORO 
.WORD 



CIEROF 
9501 
EM9501 
ER9301 



•6MPCQB.BMPCQP 
CTRLCF 



:SET POINTER BACK TO THE BEGINING OF THE QUE. 
a INDICATE THAT UE ARE NOT WITHIN A TEST. 

L1U051: 



TRAP 



C«ETST 
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SEQ ^0 



6067 
6066 
6069 
6070 
6071 
6072 
6073 
6074 
6075 
6076 
6077 
6076 
8079 
6060 
6061 
6062 



6063 
6093 
8094 



8095 
6096 



6097 
8096 



8099 
flOO 



6101 
8102 
6103 



035154 
035154 
035156 



035 1S6 
035156 
035160 
035162 
035164 

055166 
035166 
035170 
035172 
035174 

035176 
035176 
035200 
035202 
035204 
035206 

035210 
035210 
035212 
035214 
033216 
035220 



8104 
6111 



03S222 
035222 



000022 



000031 
035222 
160000 
177776 



001031 
035240 
000040 
000776 



002032 
085273 
177777 
000000 
177777 



003032 
035321 
000377 
000001 
00000? 



.SeTTL HARDWARE PARAMETER COOING SECTION 



I THE HARDWARE PARAMETER COOING SECTION CONTAINS MACROS 

i THAT AkE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 

I MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

t INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

i MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

t WITH THE OPERATOR. 
: 



BGNHRO 



{DEVICE CSR ADDRESS QUESTION: 

GPRMA HWPTQl. 0.0. 160000. 177776. YES 



jDEVICE INTERRUPT VECTOR QUESTION: 

GPRMA HWPTQ2.2.0.40.776.YES 



{ACTIVE LINES BIT MAP QUESTION: 

GPRMD HWPTQ3.4.0.MAPLNS.0. 177777. YES 



;TYPE OF LOOPBACK QUESTION: 

GPRMD HWPTQ4.6.0.377.1.2.YES 



LtHARD: 



6112 035222 


103 


123 


122 


035225 


040 


101 


104 


035230 


104 


122 


105 


035233 


123 


123 


072 


035236 


040 


000 





ENOHRD 



HUPTQl; .ASCIZ /CSR ADDRESS: / 



.WORD LI00S2 LIHARD/2 



L 10052: 



.UORD 
.UORO 
.UORO 
.WORD 



,UORD 
.WORD 
.UORD 
.UORD 



.WORD 
.UORD 
.UORD 
.UORD 
.UORD 



.UORD 
.UORD 
.UORD 
.UORD 
.UORD 



.EVEN 



T I CODE 
HUP TO I 
TILOLiri 
TIHILIW 



TICODE 
HUPTQ2 
TtLOLlH 
TIMlLin 



TICOOE 

HUPTQ3 

MAPLNS 

TILOLIM 

TIHILIM 



TICODE 
HUPTQ4 

377 

TILOLIH 
TIMILIM 



CZOHV80 DHU 11 fUWC TST PARr2 MACRO ni200 
HAROWARt PARAMETER COOING SECTION 



8115 035240 


111 


116 


124 


055245 


105 


122 


122 


055246 


125 


120 


124 


055251 


040 


126 


105 


055254 


105 


124 


117 


055257 


122 


040 


101 


055262 


104 


104 


122 


055265 


105 


125 


125 


035270 


072 


040 


000 


8114 055275 


101 


105 


124 


055276 


111 


126 


105 


055501 


040 


114 


111 


055504 


116 


105 


040 


055507 


102 


111 


124 


055512 


040 


115 


101 


055515 


120 


072 


040 


055520 


000 






8115 055521 


124 


151 


120 


055524 


105 


040 


117 


035527 


106 


040 


114 


055552 


117 


117 


120 


035535 


102 


101 


103 


055540 


113 


040 


050 


055343 


061 


075 


111 


035346 


116 


124 


105 


035351 


122 


116 


101 


035554 


114 


054 


040 


035357 


062 


075 


110 


035362 


063 


060 


062 


035365 


071 


040 


117 


035370 


122 


040 


110 


035575 


063 


062 


067 


035376 


067 


051 


072 


035401 


000 







61i6 



8117 
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HWPTa2: .ASCIZ /INTERRUPT VECTOR ADDRESS: / 



hyPTQ3: .ASCIZ /ACTIVE LINE BIT MAP: / 



HWPTQ4: .ASCIZ /TYPE OF LOOPBACK Cl-INTERNAL. 2-M3029 OR M3277) 



.EVEN 



SEQ 



6126 
8127 
S128 
8129 
8130 
8131 
8132 
8133 
8134 
8135 
8136 
8137 
8138 
3139 



8140 
8149 
8150 



8151 
8152 



8153 
8154 
8155 
8156 

8157 
8158 
8159 



8160 
8161 
8162 
8163 



035402 
035402 
035404 



035404 
035404 
035406 
035410 

035412 
035412 
035414 
035416 



035420 
035420 



035422 
035422 
035424 
035426 
035430 
035432 



000014 



000130 
035434 
000020 



000130 
035510 
000100 



006044 



001052 
0355*3 
177777 
000000 
177777 



8164 
8165 



035434 
035434 



.SBTTL SOFTUARE PARAMETER COOING 3ECTI0N 



i THE SOTTUARE PARAMETER CODING SECTION CONTAINS MACROS 

; THAT ARE USED BY THE SUPERVISOR TC BUILD P- TABLES. THE 

s MACHOS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

J INTERPRETED BY TW: SUPERVISOR AS DATA STRUCTURES. THE 

; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

J WITH THE OPERATOR. 



BGNSFT 



{UNIT NUMBER PRINTOUT QUESTION: 
GPRML SUP TQ 1.0. 20. YES 



lEXTENDED ERROR REPORTING QUESTION: 
GPRML SUPTQ2.0.100,YES 



L»SOFT: 



.WORD L 10053 L*S0FT/2 



.WORD 
.UORD 
.WORD 



.WORD 
.UORD 
.WORD 



T$CODE 
SUPTOl 
20 



T«C0DE 
SUPTQ2 
100 



IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 



XFERF ENDO 



;NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 
GPRMO SUPTQ3.2.D. 177777.0. 177777. YES 



.UORD TICOOE 



ENOD: 



.EVEN 
ENDSFT 



L 10053: 



.UORD 
.UORD 
.UORD 
.UORD 
.UORD 



.EVEN 



T$CODE 

SUPTQ3 

177777 

T»L0LIM 

T$HILIM 



8172 035434 


122 


105 


120 


035437 


117 


122 


124 


035442 


040 


125 


116 


035445 


111 


124 


040 


035450 


116 


125 


115 


035453 


102 


105 


122 


035456 


040 


101 


123 


035461 


040 


105 


101 


035464 


103 


110 


040 



SUPTQl: ,ASCIZ /REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 



CZOHVBO OHU 11 FUNC TST PARTS MACRO H1200 
SOFTWARE PARAHETER COOING SECTION 



035467 


125 


116 


111 


035472 


124 


040 


111 


035475 


123 


040 


124 


035500 


105 


123 


124 


035503 


105 


104 


072 


035506 


040 


000 


124 


6173 035510 


105 


130 


035513 


105 


116 


104 


035516 


105 


104 


040 


035521 


105 


122 


122 


035524 


117 


122 


040 


035527 


122 


105 


120 


035532 


117 


122 


124 


035535 


111 


116 


107 


035540 


072 


040 


000 


8174 035543 


116 


125 


115 


035546 


102 


105 


122 


035551 


040 


117 


106 


035554 


040 


111 


116 


035557 


104 


111 


126 


035562 


111 


104 


125 


035565 


101 


114 


040 


035570 


104 


101 


124 


035573 


101 


040 


105 


035576 


122 


122 


117 


035601 


122 


123 


040 


035604 


124 


117 


040 


035607 


122 


105 


120 


035612 


117 


122 


124 


035615 


040 


117 


116 


035620 


040 


101 


040 


035623 


114 


111 


116 


035626 


105 


072 


040 


035631 


000 







8175 



J16 
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SWPTQ2: .ASCIZ /EXTENDED ERROR REPORTING: / 



SWPTQ3: .ASCIZ /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE 



.EVEN 
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8104 
8185 

8186 035632 

8187 035632 
8168 

8195 
8196 
8197 
8196 

8199 035702 

035702 
035704 
035706 

8200 035706 
8201 

8202 
8203 
8204 
8205 
8206 
6207 
6206 



000000 
000000 



tPATCH: 



L»LAST: 



.BLKU 24 



LASTAO 



ENOMOO 



000001 



.END 



.EVEN 
.WORD 0 
.WORD 0 





FUNC 


TST PART2 


ACTLNS 


002220 


G 


CTRLCF 


ADR ■ 


000020 


G 


CSAU ■ 


ADRPTR 


014200 


G 


CIAUTO- 


ALTFLO 


013370 


G 


CIBRK - 


ASLNTL 


013442 


G 


CIBSEG- 


ASSEM8* 


000010 




CIBSCIB" 


BCOUNT 


002322 


G 


CfCEFG- 


ATT TAi 

BITTBL 


002336 


G 


CICLCK- 


BITO ■ 


000001 


G 


OCLEA" 


BITOO ■ 


000001 


G 


CICLOS* 


BITQl ■ 


000002 


G 


CICLPl- 


BIT02 • 


000004 


G 


CICVEC- 


BIT03 ■ 


000010 


G 


CIDCLN" 


BIT04 ■ 


000020 


G 


CIDOOU- 


BIT05 ■ 


000040 


G 


ClORPT* 


BIT06 • 


AAA 4 AA 

000100 


G 


CIDU - 


BIT07 » 


AAA'^AA 

000200 


G 


CIEDIT- 


BITOo ■ 


AAA^ AA 

000400 


G 


CIEROF- 


81109 ■ 


AA« AAA 

001000 


G 


CIERHR- 


Bill « 


AAAAA'^ 

000002 


G 


CIERRO- 


A ▼ T • A _ 

BITIO ■ 


AA*VAAA 

002000 


G 


CIERST- 


D TT 1 4 _ 

BITIl « 


AAA AAA 

004000 


G 


CIERSO- 


OTT 4 _ 


A€ AAy'kA 

010000 


G 


CIESCA- 


O TT « V . 

BITI3 • 


A AAAAA 

020000 


G 


CIESEG" 


DTT % Jk m, 

81114 « 


Ail AAAA 

040000 


G 


CIESUB- 


OTT « C . 

BIT15 • 


4 AAAAA 

100000 


G 


CIETST- 


O TT ^ . 

BIT2 ■ 


AAAAA A 

000004 


G 


CIEXIT* 


DTT V • 


AAAA4 A 

000010 


G 


CIGETB* 




AAAA'^A 

000020 


G 


CIGETU- 


DTTC . 


AAAAA A 

000040 


G 


CIGHAN* 


OTT^ • 
Dl lO ■ 


AAA* AA 

000100 


G 


CIGPHR- 


OTTT • 
bX 1 7 « 


AAA^AA 

000200 


G 


CIGPLO* 




AAAA AA 

000400 


G 


CIGPRI- 


OTT A . 


AA4 AAA 

001000 


G 


CIINIT- 




002412 


G 


CIINLP* 


BnHLlfc 


AA^f 4 ^ 

002612 


G 


CIHANI" 




002410 


G 


CIMEN • 


bUC * 


AAAA AA 

000400 


G 


CIHSG - 


bHLcVL 


002223 


G 


ClOPEN- 


8V^ BAb 


002650 


G 


CIPNTB- 


our cNU 


0U3O3U 


G 


CIPNTF- 


Dl f MTf\ 

bUr nXD 


003250 


G 


CIPNTS- 


Dl tfTDTD 


002246 


G 


CIPNTX- 




AAVACA 

003450 


G 


CIQIO « 


PAl MCI 


013552 


G 


CIRDBU- 


Pkil^DMD 
CHKbnK 


Old r ro 


G 


CIREFG* 




A« A AA^ 

014046 


G 


CIRESE- 




Af Af £^ 

O 14 loo 


G 


CIREVI- 


^1 l^DOl 


AAA« A^ 


G 


CIRFLA" 




AAOVAA 


5 


CIRPT " 




AAOV4 ^ 

002312 


c 


CISEFG* 




A1 


G 


CISPRI* 






G 


CISVEC- 


CLNRST 


014216 


G 


CITPRI- 


CLR16U 


014240 


G 


DELAY 


CSRA 


002226 


G 


OFPTBL 


CSRO » 


000000 


G 


DIAGMC- 
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00<^250 G 


DMABUF 


014322 


G 


000052 


DOOMA 


014400 


G 


000061 


OR ADR T 


002226 


G 


000022 


DROP 


020730 




000004 


EOROP 


021006 




000002 


EF.CON- 


000036 


G 


000045 


EF.NEU- 


000035 


G 


000062 


EF.PUR- 


000034 


G 


000012 


EF.RE?- 


000037 


G 


OOOOSS 


EF . STA- 


000040 


G 


000006 


EF050S 


004156 


G 


000036 


EF1601 


004163 


G 


000044 


EF5B01 


004215 


G 


000051 


EF5901 


004270 


G 


000024 


EF5902 


004320 


G 


000053 


EF6401 


004350 


G 


000003 


EF70O1 


004417 


G 


000055 


EF9001 


004455 


G 


000056 


EF9002 


004537 


G 


000060 


EF9003 


004611 


G 


000054 


EF9004 


004640 


G 


000057 


EF9005 


004670 


C 


000010 


EF9006 


004721 


G 


000005 


EF9010 


004745 


G 


000003 


EF9019 


005034 


G 


000001 


EF9301 


005053 


G 


000032 


EF9302 


005131 


G 


000026 


Enoioi 


015124 


G 


000027 


En0102 


015210 


G 


000043 


Eri0103 


005262 


G 


000042 


EN1601 


005320 


G 


000030 


Emool 


005403 


G 


000040 


Em002 


005435 


G 


000011 


Emioi 


005471 


G 


000020 


En4102 


005523 


G 


000050 


Emios 


005557 


G 


000031 


En4201 


005643 


G 


000023 


En4202 


005675 


G 


000034 


En4901 


005717 


G 


000014 


Em902 


005760 


G 


000017 


EH5001 


006012 


G 


000016 


En5101 


006051 


G 


000015 


EMS 102 


006106 


G 


000377 


EM5103 


006144 


G 


000007 


En5201 


006174 


G 


000047 


En5202 


006227 


G 


000033 


En5301 


006265 


G 


000003 


EM5502 


006321 


G 


000021 


Er'S303 


006401 


G 


000025 


E'15401 


006452 


G 


000046 


F.M5402 


006520 


G 


000041 


EM5501 


006561 


G 


000037 


EM5601 


006625 


G 


000013 


EM5701 


006702 


G 


014262 G 


EM5801 


006757 


G 


002176 G 


EM5802 


007003 


G 


000000 


EM5803 


007077 


G 



EM5804 007201 G 

EMS805 007265 G 

EM5901 007346 G 

EM5902 007402 G 

EMS903 007476 G 

EM5904 007570 G 

EM5905 007654 G 

EH6001 007754 G 

EH6002 010000 G 

EM6003 010040 G 

EM6004 010120 G 

EH6005 010165 G 

EM6006 010243 G 

EH6401 010307 G 

EM6402 010344 G 

EH6601 010405 G 

EH6602 010442 G 

EM6701 010514 G 

EM6702 010546 G 

EH9009 010623 G 

EM9010 010647 G 

EM9014 010673 G 

EM9017 010767 G 

EM9026 011100 G 

EM9104 011124 G 

EM9301 011200 G 

En9302 011257 G 

EM9303 011307 G 

EM9304 011354 G 

ENOO 035434 

ENOETB 003650 G 

EKOIT 020650 

ERCNTB 002614 G 

ERLTBL 002650 G 

ERRBLK 004056 G 

ERRtlSG 004054 G 

ERRNBR 004052 G 

ERRTYP 004050 G 

ERSMRF 002612 G 

EROlOl 011430 G 

ER0503 011762 G 

ER1603 012020 G 

ERS801 012112 G 

ERS901 012170 G 

ER6001 012276 G 

ER6401 012400 G 

ER7801 012506 G 

ER9001 012544 G 

ER9002 012644 G 

ER9004 013022 G 

ER9101 013136 G 

ER9301 013176 G 
EVL - 000004 G 

EXOERR 002252 G 
E$ENO - 002100 
E»L0A0- 000035 

FOATA 002234 G 



FOATO - 000006 G 
FINACT 014470 G 
FSLSA 002234 G 
FSLSO - 000006 G 
F$AU - 000015 
F>AUTO- 000020 
FtBGN - 000040 
FICLEA- 000007 
FfDU - 000016 
FIEND ■ 000041 
FtHARD- 000004 
F«HU - 000013 
FIINIT- 000006 
F»JMP ■ 000050 
FtMOO - 000000 
FIMSG - 000011 
F$PROT- 000021 
FIPUR - 000017 
F$RPT - 000012 
FtSEG - 0C0003 
F$SOFT- 000005 
FISRV « 000010 
FISUB - 000002 
FtSH - 000014 
F$TEST- 000001 
GETPRM 020446 
GPRSOB 002376 G 
G»CNTO- 000200 
GIDELM- 000372 
GIOISP- 000003 
GIEXCP* 000400 
G>HILI- 000002 
G$L0LI» 000001 
G>NO > 000000 
GIOFFS" 000400 
G»OFSI- 000376 
GIPRMA- 000001 
GIPRMD- 000002 
GSPRML- 000000 
GtRAOA- 000140 
G$RAOB- 000000 
GIRAOO- 000040 
GIRAOL- 000120 
GIRAOO- 000020 
GIM^ER- 000004 
GIVES - 000010 
HELP - 000000 
HOE - 100000 G 
HUPTQl 035222 
HUPTQ2 035240 
HUPTQ3 035273 
HUPTQ4 035321 
IBE > 010000 G 
IDU • 000040 G 
lER > 020000 G 
lESTAT 002256 G 
INOATP 014550 G 



INOTPX 


014600 G 


L*EXP4 


ISR 


000100 G 


L$EXPS 


IXE 


004000 G 


L>HARO 


I$AU " 


000041 


LtHIME 


i$Auro« 


000041 


L>HPCP 


ItCLN - 


000041 


LIHPTP 


ItOU - 


000041 


L>HU 


I»HRO - 


000041 


L«ICP 


I$INIT- 


000041 


L»rNIT 


I$MOO - 


000041 


LILAOP 


I$nSG - 


000041 


L>LAST 


I»PROT« 


000040 


L$LOAO 


I$PTAB- 


000041 


LILUN 


ItPUR - 


000041 


L>MREV 


I»RPT - 


000041 


LINAME 


I>SEG - 


000041 


LIPRIO 


I$SETU- 


000041 


LIPROT 


I$SFT - 


000041 


L$PRT 


I$SRV • 


000041 


LIREPP 


I$SUB - 


000041 


L<REV 


IITST • 


000041 


LIRPT 


J»JMP « 


000167 


L«SOFT 


LGRPIM 


002260 G 


L$SPC 


LGRP2H 


002262 G 


L$SPCP 


LINBIT 


014650 G 


L«SPTP 


LNCTRA 


002236 G 


LiSTA 


LNCTRO- 


000010 G 


L«SU 


LOE 


040000 G 


LITEST 


LOPBCK 


002222 G 


L«TIML 


LOT 


000010 G 


LIUNIT 


LPCSLT- 


000036 G 


LIOOOO 


LPRA 


002232 G 


L 10001 


LPRO « 


000004 G 


L 10002 


LSACP 


002110 G 


L10003 


L*APT 


002036 G 


L10004 


L$AU 


021014 G 


L 10005 


L»AUT 


002070 G 


L10006 


L»AUTO 


020664 G 


L10007 


LICCP 


002106 G 


LlOOlO 


L»CLEA 


020666 G 


L 10011 


L»CO 


002032 G 


L10012 


L»OEPO 


002011 G 


L10013 


L>0£SC 


004130 G 


L 10014 


LIOESP 


002076 G 


LIOOIS 


L»OEVP 


002060 G 


L10016 


LIOISP 


002124 G 


L10017 


LtOLY 


002116 G 


L 10021 


L»OTP 


002040 G 


L10022 


L$OTYP 


002034 G 


L1002S 


L«OU 


020704 G 


L10024 


L>OUT 


002072 G 


L10025 


LtOVTY 


004120 G 


L10026 


Lief 


002052 G 


L 10027 


L$ENVI 


002044 G 


L10030 


L«ERRT 


004050 G 


L10031 


LIETP 


002102 G 


L10032 


LIEXPl 


002046 G 


L 10033 
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002064 G 


L 10034 


024714 


002066 G 


L 10035 


025406 


035156 G 


L 10036 


025714 


002120 G 


L 10037 


026224 


002016 G 


L 10040 


026724 


002022 G 


L10041 


027422 


002176 G 


L10042 


030100 


002104 G 


L10043 


031150 


020044 G 


L10044 


031736 


002026 G 


L 10045 


032764 


035706 G 


L10046 


033410 


002100 G 


L10047 


034126 


002074 G 


L 10050 


035072 


002050 G 


L10051 


035152 


002000 G 


L 10052 


035222 


002042 G 


L 10053 


035434 


020036 G 


MAPCNT 


014676 G 


002112 G 


HAPLNS- 


177777 G 


002062 G 


MFUNIT 


005231 G 


002010 G 


rtlENAB 


002334 G 


020030 G 


MHPRES 


002332 G 


035404 G 


HMSRO 


002330 G 


002056 G 


nsGi 


011546 G 


002020 G 


nsG2 


011624 G 


002024 G 


nSG3 


011703 G 


002030 G 


nSLCNT 


002326 G 


002210 G 


MSLGET 


014730 G 


002114 G 


nsLOOP 


015044 G 


002014 G 


HSTICK 


002324 G 


002012 G 


NDERPT 


002212 G 


002206 


NEUPAS 


020426 


002214 


NEURES 


020420 


011544 


NEUSTA 


020110 


012016 


HUrt.NS« 


000020 G 


012110 


OOPS 


015060 G 


012166 


OPTION 


002210 G 


012274 


OIAPTS- 


000000 


012376 


OIAU - 


000000 


012504 


OIBGNR" 


000001 


012542 


OIBGNS- 


000001 


012642 


0$DU - 


000001 


013020 


OIERRT* 


000001 


013134 


OtGNSU- 


000001 


013174 


0$POIN- 


000001 


013366 


OISETU" 


000000 


020034 


PASCNT 


002264 G 


020662 


PCSLOT" 


000016 G 


020664 


PNT 


001000 G 


020702 


PREGRT 


004102 G 


021012 


PREG05 


004060 


021020 


PRI 


' 002000 G 


021302 


PRIOO - 


> 000000 G 


021706 


PRIOl " 


0U0040 G 


022344 


PRI02 - 


' 000100 G 


022672 


PRI03 - 


' 000140 G 


023472 


PRI04 ■ 


000200 G 


024272 


PRI05 ■ 


000240 G 



PRI06 - 000300 G 
PRI07 - 000340 G 
PRTLPR 015306 G 
PUFirO 015370 G 
PUFIFR 015452 G 
RBUFA 002230 G 
RBUFG - 000002 G 
READBX 015654 G 
REPOER 015736 G 
REPSMR 016254 G 
RESETT 016302 G 
RXBOTX- 000030 G 
RXBETX- 000020 G 
RXBFUL- 000100 G 
RXCNTB 003710 G 
RXOECT 017702 G 
RXIEO 016414 G 
RXIEl 016454 G 
RXINTC 002266 G 
RXINTF 002270 G 
RXTIHO- 000002 G 
RXTHA 002230 G 
RXVECA 002214 G 
ROSLOT- 000002 G 
RISLGT- 000004 G 
R2SL0T- 000006 G 
R3SL0T- 000010 G 
R4SL0T- 000012 G 
R5SL0T- 000014 G 
SAVBNP 016500 G 
SETPAR 016546 G 
SFPTBL 002210 G 
SKPSTS 016614 G 
STGTRB 004030 G 
SVCG8L- 000000 
SVCINS- 000001 
SVCSUB- 000001 
SVCTAG- 000001 
SVCTST* 000001 
SUPTQl 035434 
SUPTQ2 035510 
SUPTQ3 035543 
SVLSYH- 010000 
TIHERl 002314 G 
TI'*^R2 002316 G 
TIHER3 002320 G 
TNUn - 000024 G 
TP4n.G 002300 G 
TP4RTN 017712 C 
TP4VEC 002276 G 
TSABRT 016672 G 
TSTNUH 002254 G 
TXAOIA 002240 G 
TXAOlO- 000012 G 
TXAD2A 002242 G 
TXA020- 000014 G 
TXAINT 017734 G 



TXBFCA 002244 G 
TXBFCO- 000016 G 
TXOATP 017004 G 
TXOSBL 017026 G 
TXENBL 017122 G 
TXIEO 017216 G 
TXIEI 017256 G 
TXINTC 002272 G 
TXINTF 002274 G 
TXRLNB 004010 G 
TXRLNE 004030 G 
TXRXLB 003750 G 
TXRXLE 004010 G 
TXVECA 002216 G 
TIARGC- 000002 
T$C00E- 001052 
T$ERRN- 022125 
TIEXCP- 000000 
TtFLAG- 000040 
TtGMAN- 000000 
T$HILI- 177777 
TILAST- 000001 
T$LOLI- 000000 
TILSYM- 010000 
T»LTNO» 000024 
TINEST- 177777 
TINSO - 000000 
TINSl - 000005 
TtPTNU- 000000 
TISAVL* 177777 
T»SEGL- 177777 
T>SUBN* 000000 
TiTAGL- 177777 
TtTAGN- 010054 
TITEMP- 000000 
TITEST- 000024 
T$TSTM« 177777 
TiTSTS- 000001 
T>»AU - 010025 
T>»AUT- 010022 
T«ICLE> 010023 
T«»OU - 010024 
TIIHAR- 010052 
Ti«HU - 010000 
T>$INI- 010021 
T»»nSG* 010016 
TItPRO- 010020 
T»$RPT» 010017 
T$$SOr- 010053 
T»»SU - 010001 
T»fTES- 010051 
Tl 021022 G 

no 025716 G 
Til 026226 G 
T12 026726 G 
TIS 027424 G 
T14 030102 G 



Bl 
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SEO 206 



Mb 
1 16 
T17 

Tia 

T19 
T2 



OS 1152 G 
031740 C 
032766 G 
033412 C 
034130 C 
021304 G 



T20 

T3 

T4 

T5 

T6 

T7 



035074 G 
021710 G 
022346 G 
022674 G 
023474 G 
024274 G 



T8 
T9 
UAH 



024716 G 
025410 G 
000200 G 
002224 G 
017302 G 



UAIBIS 017436 G 

WAITTX 017512 G 

WOROl 002302 G 

WTWLNC 017552 G 

UTULPR 017602 G 



XIALUA- 000000 

XtFALS- 000040 

XIOFFS- 000400 

XI TRUE- 000020 



UNITN 
UNSOIV 



IPATCM 035652 G 



. ABS. 035706 000 
000000 001 
ERRORS DETECTED: 0 
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